home *** CD-ROM | disk | FTP | other *** search
/ Computer Life 1996 January / Computer Life January 1996.iso / vis3 / demos / kitchen.vrt / world.script < prev    next >
Encoding:
Text File  |  1994-02-18  |  187.4 KB  |  11,708 lines
  1. ;
  2. ; Script conversion of file KITCHEN.WLD
  3. ;
  4. Type: WRLD
  5. Title: "\n\n\r"
  6.        "World file KITCHEN.WLD revision 47\n\r"
  7.        "Saved from VRT version 3.09\n\r"
  8.        "\x1A"
  9. ;
  10. ;-------Object    0-------------------------------------------------------
  11. ; 
  12. Chunk: Standard
  13.  Name:     "RootObject"
  14.  Number:   0
  15.  Size:     2147483647 2147483647 2147483647
  16.  Position: 0 0 0
  17.  Type:     65535
  18.  Layer:    0
  19.  DFlags:   E
  20. End_Chunk
  21. Chunk: ViewPoint
  22.  Number:    100
  23.  Subchunk
  24.   Number:  1
  25.   Type:    35
  26.   View:    0
  27.   Point:   0
  28.   Frames:  1
  29.   Position:  0 Frame:   0  Type: StraightMove Pos: 2053769 16852 2028087
  30.   Rotation:  0 Frame:   0 Type: Relative Offset: 1816 32640 0 Zoom: 0x29BA
  31.  Subchunk
  32.   Number:  2
  33.   Type:    7
  34.   View:    30
  35.   Point:   0
  36.   Frames:  1
  37.   Position:  0 Frame:   0  Type: StraightMove Pos: 41769 16852 26087
  38.   Rotation:  0 Frame:   0 Type: Relative Offset: 1820 32647 0 Zoom: 0x29BA
  39.  Subchunk
  40.   Number:  3
  41.   Type:    35
  42.   View:    31
  43.   Point:   0
  44.   Frames:  1
  45.   Position:  0 Frame:   0  Type: StraightMove Pos: -5824 13752 16012
  46.   Rotation:  0 Frame:   0 Type: Relative Offset: 4150 9754 0 Zoom: 0x29BA
  47.  Subchunk
  48.   Number:  4
  49.   Type:    35
  50.   View:    30
  51.   Point:   0
  52.   Frames:  1
  53.   Position:  0 Frame:   0  Type: StraightMove Pos: 31344 16123 8663
  54.   Rotation:  0 Frame:   0 Type: Relative Offset: 4400 22795 0 Zoom: 0x29BA
  55.  Subchunk
  56.   Number:  5
  57.   Type:    35
  58.   View:    30
  59.   Point:   0
  60.   Frames:  1
  61.   Position:  0 Frame:   0  Type: StraightMove Pos: 35850 37950 17920
  62.   Rotation:  0 Frame:   0 Type: Relative Offset: 16184 29578 0 Zoom: 0x29BA
  63. End_Chunk
  64. Chunk: Colours
  65.  Number: 6
  66.  0xD7 0x07 0x01 0xCC 0x00 0x00
  67. End_Chunk
  68.  
  69. Children:
  70. ;
  71. ;-------Object    2-------------------------------------------------------
  72. ; 
  73. Chunk: Standard
  74.  Name:     "Kitchen-Area"
  75.  Number:   2
  76.  Size:     59000 30000 36550
  77.  Position: 2010000 0 2000000
  78.  Type:     65535
  79.  Layer:    0
  80. End_Chunk
  81. Chunk: SCL
  82. objnum strt_ob, cur_ob, buf[32];
  83.  
  84. short  go, x, pointer, delay;
  85.  
  86. long   xx, yy, zz, xr, yr, zr;
  87.  
  88.  
  89.  
  90. /*
  91.  
  92.  
  93.  
  94.  
  95.  
  96.                     Variables:
  97.  
  98.  
  99.  
  100.                     xx yy zz   temp store of viewpoint coordinates
  101.  
  102.                     xr yr zr   temp store of viewpoint rotations
  103.  
  104.  
  105.  
  106.  
  107.  
  108.      note: This code utilises the tree traversal algorythm
  109.  
  110.             found in library object treetrav.vca
  111.  
  112.  
  113.  
  114.  
  115.  
  116. */
  117.  
  118.  
  119.  
  120. strt_ob=#0;
  121.  
  122. resume (5, 5);
  123.  
  124. cur_ob=strt_ob;
  125.  
  126. /*
  127.  
  128.  
  129.  
  130.  
  131.  
  132.             wait until the viewpoint is stationary
  133.  
  134.  
  135.  
  136. */
  137.  
  138. do
  139.  
  140. {
  141.  
  142.   if (xview==xx && yview==yy && zview==zz && int (xvroff)==xr && 
  143.  
  144.       int (yvroff)==yr && int (zvroff)==zr)
  145.  
  146.     break;
  147.  
  148.   xx=xview;
  149.  
  150.   yy=yview;
  151.  
  152.   zz=zview;
  153.  
  154.   xr=xvroff;
  155.  
  156.   yr=yvroff;
  157.  
  158.   zr=zvroff;
  159.  
  160.   waitf;
  161.  
  162. }
  163.  
  164. until (false);
  165.  
  166. pointer=0;
  167.  
  168. go=1;
  169.  
  170. /*
  171.  
  172.  
  173.  
  174.             switch textures on
  175.  
  176. */
  177.  
  178. if (#31.j!=1)
  179.  
  180. {
  181.  
  182.   while (go==1)
  183.  
  184.   {
  185.  
  186.     if (child (cur_ob)>#0)
  187.  
  188.     {
  189.  
  190.       buf[pointer]=cur_ob;
  191.  
  192.       pointer+=1;
  193.  
  194.       cur_ob=child (cur_ob);
  195.  
  196.     }
  197.  
  198.     else
  199.  
  200.     {
  201.  
  202.       while (1)
  203.  
  204.       {
  205.  
  206.         x=0;
  207.  
  208. /* process object here */
  209.  
  210.  
  211.  
  212.  
  213.  
  214.         if (layer (cur_ob)==1)
  215.  
  216.         {
  217.  
  218. /*        repeat (ncols (cur_ob))
  219.  
  220.           tpsize (cur_ob, inloop)=0;
  221.  
  222. */
  223.  
  224.           setlayer (1, 1);
  225.  
  226.           repeat (3)
  227.  
  228.           {
  229.  
  230.             invis (child (cur_ob));
  231.  
  232.             invis (gsibling (child (cur_ob), 1));
  233.  
  234.             invis (gsibling (child (cur_ob), 2));
  235.  
  236.           }
  237.  
  238.         }
  239.  
  240.         if (sibling (cur_ob)>#0 && pointer>0)
  241.  
  242.         {
  243.  
  244.           cur_ob=sibling (cur_ob);
  245.  
  246.           break;
  247.  
  248.         }
  249.  
  250.         else
  251.  
  252.         {
  253.  
  254.           pointer-=1;
  255.  
  256.           if (pointer>=0)
  257.  
  258.             cur_ob=buf[pointer];
  259.  
  260.           else
  261.  
  262.           {
  263.  
  264.             go=0;
  265.  
  266.             break;
  267.  
  268.           }
  269.  
  270.         }
  271.  
  272.       }
  273.  
  274.     }
  275.  
  276.   }
  277.  
  278. }
  279.  
  280. clrtrig (me, 0);
  281.  
  282. vis (me);
  283.  
  284. if (#31.j!=1)
  285.  
  286. {
  287.  
  288. /*
  289.  
  290.  
  291.  
  292.  
  293.  
  294.             wait until the viewpoint is moving
  295.  
  296.  
  297.  
  298. */
  299.  
  300.  
  301.  
  302.   do
  303.  
  304.   {
  305.  
  306.     if (xview!=xx || yview!=yy || zview!=zz || int (xvroff)!=xr 
  307.  
  308.         || int (yvroff)!=yr || int (zvroff)!=zr)
  309.  
  310.       break;
  311.  
  312.     xx=xview;
  313.  
  314.     yy=yview;
  315.  
  316.     zz=zview;
  317.  
  318.     xr=xvroff;
  319.  
  320.     yr=yvroff;
  321.  
  322.     zr=zvroff;
  323.  
  324.     waitf;
  325.  
  326.   }
  327.  
  328.   until (false);
  329.  
  330.   pointer=0;
  331.  
  332.   go=1;
  333.  
  334. /*
  335.  
  336.  
  337.  
  338.  
  339.  
  340.             turn textures off
  341.  
  342. */
  343.  
  344.   while (go==1)
  345.  
  346.   {
  347.  
  348.     if (child (cur_ob)>#0)
  349.  
  350.     {
  351.  
  352.       buf[pointer]=cur_ob;
  353.  
  354.       pointer+=1;
  355.  
  356.       cur_ob=child (cur_ob);
  357.  
  358.     }
  359.  
  360.     else
  361.  
  362.     {
  363.  
  364.       while (1)
  365.  
  366.       {
  367.  
  368.         x=0;
  369.  
  370. /* process object here */
  371.  
  372.  
  373.  
  374.  
  375.  
  376.         if (layer (cur_ob)==1)
  377.  
  378.         {
  379.  
  380. /*        repeat (ncols (cur_ob))
  381.  
  382.           tpsize (cur_ob, inloop)=4;
  383.  
  384. */
  385.  
  386.           setlayer (1, 0);
  387.  
  388.           repeat (3)
  389.  
  390.           {
  391.  
  392.             vis (child (cur_ob));
  393.  
  394.             vis (gsibling (child (cur_ob), 1));
  395.  
  396.             vis (gsibling (child (cur_ob), 2));
  397.  
  398.           }
  399.  
  400.         }
  401.  
  402.         if (sibling (cur_ob)>#0 && pointer>0)
  403.  
  404.         {
  405.  
  406.           cur_ob=sibling (cur_ob);
  407.  
  408.           break;
  409.  
  410.         }
  411.  
  412.         else
  413.  
  414.         {
  415.  
  416.           pointer-=1;
  417.  
  418.           if (pointer>=0)
  419.  
  420.             cur_ob=buf[pointer];
  421.  
  422.           else
  423.  
  424.           {
  425.  
  426.             go=0;
  427.  
  428.             break;
  429.  
  430.           }
  431.  
  432.         }
  433.  
  434.       }
  435.  
  436.     }
  437.  
  438.   }
  439.  
  440. }
  441.  
  442. clrtrig (me, 0);
  443.  
  444. vis (me);
  445. end
  446. End_Chunk
  447.  
  448. Children:
  449. ;
  450. ;-------Object  337-------------------------------------------------------
  451. ; 
  452. Chunk: Standard
  453.  Name:     "roof"
  454.  Number:   337
  455.  Size:     59000 0 36550
  456.  Position: 0 26000 0
  457.  Type:     86
  458.  Layer:    0
  459. End_Chunk
  460. Chunk: SCL
  461. resume (1, 3);
  462.  
  463. if (counter (1)==1)
  464.  
  465. {
  466.  
  467. /*
  468.  
  469.  
  470.  
  471.         if the width of the scree is less than 800 pixels
  472.  
  473.                 then attempt to up the resolution.
  474.  
  475.            otherwise..
  476.  
  477.                 attempt to decrease resolution.
  478.  
  479. */
  480.  
  481.  
  482.  
  483.   if (screenw<800)
  484.  
  485.     obey (0x4600006D);
  486.  
  487.   else
  488.  
  489.     obey (0x4600006E);
  490.  
  491.   waitfs (5);
  492.  
  493.   counter (1)=0;
  494.  
  495. }
  496. end
  497. End_Chunk
  498. Chunk: Colours
  499.  Number: 16
  500.  0x7C 0x1A 0x7D 0x7D 0x7D 0x7D 0x7D 0x1A 0x1A 0x7D 0x7D 0x7D 0x7D 0x1A 0x1A 0x16
  501. End_Chunk
  502. ;
  503. ;-------Object   31-------------------------------------------------------
  504. ; 
  505. Chunk: Standard
  506.  Name:     "TextureSelectCode"
  507.  Number:   31
  508.  Size:     26400 0 26400
  509.  Position: 28400 0 2000
  510.  Type:     2
  511.  Layer:    0
  512. End_Chunk
  513. Chunk: SCL
  514. objnum strt_ob, cur_ob, buf[32];
  515.  
  516. short  go, x, pointer, j;
  517.  
  518.  
  519.  
  520. /*
  521.  
  522.             Variables:
  523.  
  524.  
  525.  
  526.             j   current door type for display
  527.  
  528.  
  529.  
  530. This code examine all the objects in the world, using a tree traversal
  531.  
  532. algorythm, in order to determine if it is a door. If so, then change its 
  533.  
  534. texture.
  535.  
  536.  
  537.  
  538. The tree traversal algorythm is documented in the library object
  539.  
  540. Treetrav.vca, which can be imported into this world for examination.
  541.  
  542.  
  543.  
  544. */
  545.  
  546. resume (2, 3);
  547.  
  548. if (first)
  549.  
  550. {
  551.  
  552.   j=0;
  553.  
  554.   counter (2)=1;
  555.  
  556. }
  557.  
  558. if (counter (2)==1)
  559.  
  560. {
  561.  
  562.  
  563.  
  564.  
  565.  
  566. /*
  567.  
  568.                         set up start object for traversal
  569.  
  570.  
  571.  
  572. */
  573.  
  574.   strt_ob=#0;
  575.  
  576.   cur_ob=strt_ob;
  577.  
  578.  
  579.  
  580.  
  581.  
  582. /*
  583.  
  584.                         increment door type 
  585.  
  586. */
  587.  
  588.   j+=1;
  589.  
  590.   if (j>4)
  591.  
  592.     j=1;
  593.  
  594.  
  595.  
  596. /*
  597.  
  598.  
  599.  
  600.                         perform tree traversal
  601.  
  602.  
  603.  
  604. */
  605.  
  606.   pointer=0;
  607.  
  608.   go=1;
  609.  
  610.   while (go==1)
  611.  
  612.   {
  613.  
  614.     if (child (cur_ob)>#0)
  615.  
  616.     {
  617.  
  618.       buf[pointer]=cur_ob;
  619.  
  620.       pointer+=1;
  621.  
  622.       cur_ob=child (cur_ob);
  623.  
  624.     }
  625.  
  626.     else
  627.  
  628.     {
  629.  
  630.       while (1)
  631.  
  632.       {
  633.  
  634.         x=0;
  635.  
  636.  
  637.  
  638.  
  639.  
  640. /* process object here *//*
  641.  
  642.                         is object a door (layer 1) ?
  643.  
  644. */
  645.  
  646.         if (layer (cur_ob)==1)
  647.  
  648.         {
  649.  
  650. /*
  651.  
  652.                         is door to be textured ?
  653.  
  654. */
  655.  
  656.           if (j>1)
  657.  
  658.           {
  659.  
  660. /*
  661.  
  662.                         yes, then visiblise all texture door objects.
  663.  
  664.                         & invisiblise the current object's non-textured
  665.  
  666.                         children.
  667.  
  668. */
  669.  
  670.  
  671.  
  672.  
  673.  
  674.  
  675.  
  676.  
  677.  
  678.             setlayer (1, 1);
  679.  
  680.             repeat (3)
  681.  
  682.             {
  683.  
  684.               invis (child (cur_ob));
  685.  
  686.               invis (gsibling (child (cur_ob), 1));
  687.  
  688.               invis (gsibling (child (cur_ob), 2));
  689.  
  690.             }
  691.  
  692.  
  693.  
  694. /*
  695.  
  696.                         no, then invisiblise all texture door objects
  697.  
  698.                         & visiblise the current object's non-textured
  699.  
  700.                         children.
  701.  
  702. */
  703.  
  704.           }
  705.  
  706.           if (j==1)
  707.  
  708.           {
  709.  
  710.             setlayer (1, 0);
  711.  
  712.             repeat (3)
  713.  
  714.             {
  715.  
  716.               vis (child (cur_ob));
  717.  
  718.               vis (gsibling (child (cur_ob), 1));
  719.  
  720.               vis (gsibling (child (cur_ob), 2));
  721.  
  722.             }
  723.  
  724.           }
  725.  
  726.           repeat (ncols (cur_ob))
  727.  
  728.           {
  729.  
  730.             if (timgref (cur_ob, inloop)>0)
  731.  
  732.               timgref (cur_ob, inloop)=j;
  733.  
  734.           }
  735.  
  736. /*
  737.  
  738.                         continue with tree traversal
  739.  
  740. */
  741.  
  742.         }
  743.  
  744.         if (sibling (cur_ob)>#0 && pointer>0)
  745.  
  746.         {
  747.  
  748.           cur_ob=sibling (cur_ob);
  749.  
  750.           break;
  751.  
  752.         }
  753.  
  754.         else
  755.  
  756.         {
  757.  
  758.           pointer-=1;
  759.  
  760.           if (pointer>=0)
  761.  
  762.             cur_ob=buf[pointer];
  763.  
  764.           else
  765.  
  766.           {
  767.  
  768.             go=0;
  769.  
  770.             break;
  771.  
  772.           }
  773.  
  774.         }
  775.  
  776.       }
  777.  
  778.     }
  779.  
  780.   }
  781.  
  782.   waitf;
  783.  
  784.   palette (j);
  785.  
  786.   counter (2)=0;
  787.  
  788. }
  789.  
  790. if (layer (cur_ob)==1)
  791.  
  792. {
  793.  
  794.   setlayer (1, 1);
  795.  
  796.   repeat (3)
  797.  
  798.   {
  799.  
  800.     invis (child (cur_ob));
  801.  
  802.     invis (gsibling (child (cur_ob), 1));
  803.  
  804.     invis (gsibling (child (cur_ob), 2));
  805.  
  806.   }
  807.  
  808. }
  809.  
  810. if (layer (cur_ob)==1)
  811.  
  812. {
  813.  
  814.   setlayer (1, 0);
  815.  
  816.   repeat (3)
  817.  
  818.   {
  819.  
  820.     vis (child (cur_ob));
  821.  
  822.     vis (gsibling (child (cur_ob), 1));
  823.  
  824.     vis (gsibling (child (cur_ob), 2));
  825.  
  826.   }
  827.  
  828. }
  829. end
  830. End_Chunk
  831. Chunk: Colours
  832.  Number: 33
  833.  0x56 0x56 0x56 0x00 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56
  834.  0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00
  835.  0x57
  836. End_Chunk
  837. ;
  838. ;-------Object   40-------------------------------------------------------
  839. ; 
  840. Chunk: Standard
  841.  Name:     "NW-Corner[40]"
  842.  Number:   40
  843.  Size:     27450 26000 8150
  844.  Position: 2000 0 28400
  845.  Type:     65535
  846.  Layer:    0
  847. End_Chunk
  848. Chunk: Colours
  849.  Number: 18
  850.  0x02 0x02 0x02 0x02 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08
  851.  0x08 0x08
  852. End_Chunk
  853.  
  854. Children:
  855. ;
  856. ;-------Object   10-------------------------------------------------------
  857. ; 
  858. Chunk: Standard
  859.  Name:     "NW-Corner[10]"
  860.  Number:   10
  861.  Size:     9450 26000 2000
  862.  Position: 16000 0 0
  863.  Type:     8
  864.  Layer:    0
  865. End_Chunk
  866. Chunk: Colours
  867.  Number: 27
  868.  0x00 0x7A 0x16 0x00 0x13 0x15 0x13 0x35 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  869.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x00
  870. End_Chunk
  871. ;
  872. ;-------Object   29-------------------------------------------------------
  873. ; 
  874. Chunk: Standard
  875.  Name:     "NW-Corner[29]"
  876.  Number:   29
  877.  Size:     12000 26000 2000
  878.  Position: 4000 0 0
  879.  Type:     104
  880.  Layer:    0
  881.  OFlags:   Aa
  882. End_Chunk
  883. Chunk: SCL
  884. /*
  885.  
  886.  
  887.  
  888.             if selected
  889.  
  890.             then set animation off.
  891.  
  892.  
  893.  
  894. */
  895.  
  896. if (activate (me, 0))
  897.  
  898.   animode (me, 1)=7;
  899.  
  900.  
  901. end
  902. End_Chunk
  903. Chunk: Animations
  904.  Number: 1
  905.  Subchunk
  906.   First:    1
  907.   Last:     20
  908.   Phase:    0x0100
  909.   Velocity: 0x0100
  910.   Mode:     0
  911. End_Chunk
  912. Chunk: Colours
  913.  Number: 45
  914.  0x00 0x7A 0x15 0x7A 0x79 0x7A 0x79 0x15 0x14 0x15 0x13 0x14 0x12 0x11 0x12 0x13
  915.  0xBB 0x12 0x13 0x12 0x11 0xC0 0x37 0xE9 0x14 0x14 0x00 0x14 0x15 0x14 0x14 0x17
  916.  0x17 0x18 0x16 0x16 0x16 0x00 0x64 0x63 0x65 0x00 0x62 0x63 0x67
  917. End_Chunk
  918. ;
  919. ;-------Object   28-------------------------------------------------------
  920. ; 
  921. Chunk: Standard
  922.  Name:     "NW-Corner[28]"
  923.  Number:   28
  924.  Size:     4000 26000 2000
  925.  Position: 0 0 0
  926.  Type:     8
  927.  Layer:    0
  928. End_Chunk
  929. Chunk: Colours
  930.  Number: 27
  931.  0x00 0x7A 0x16 0x00 0x13 0x15 0x13 0x35 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  932.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x00
  933. End_Chunk
  934. ;
  935. ;-------Object   11-------------------------------------------------------
  936. ; 
  937. Chunk: Standard
  938.  Name:     "NW-Corner[11]"
  939.  Number:   11
  940.  Size:     2000 26000 2000
  941.  Position: 25450 0 0
  942.  Type:     103
  943.  Layer:    0
  944. End_Chunk
  945. Chunk: Colours
  946.  Number: 6
  947.  0x52 0x51 0x52 0x53 0x79 0x7A
  948. End_Chunk
  949. ;
  950. ;-------Object   13-------------------------------------------------------
  951. ; 
  952. Chunk: Standard
  953.  Name:     "NW-Corner[13]"
  954.  Number:   13
  955.  Size:     2000 26000 4150
  956.  Position: 25450 0 2000
  957.  Type:     10
  958.  Layer:    0
  959. End_Chunk
  960. Chunk: Colours
  961.  Number: 27
  962.  0x00 0x79 0x18 0x00 0x13 0x15 0x13 0x35 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  963.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x00
  964. End_Chunk
  965. ;
  966. ;-------Object   12-------------------------------------------------------
  967. ; 
  968. Chunk: Standard
  969.  Name:     "NW-Corner[12]"
  970.  Number:   12
  971.  Size:     2000 26000 2000
  972.  Position: 25450 0 6150
  973.  Type:     4
  974.  Layer:    0
  975. End_Chunk
  976. Chunk: Colours
  977.  Number: 9
  978.  0x7A 0x7A 0x00 0x00 0x00 0x00 0x15 0x18 0x00
  979. End_Chunk
  980.  
  981. End_Children
  982. ;
  983. ;-------Object   41-------------------------------------------------------
  984. ; 
  985. Chunk: Standard
  986.  Name:     "NW-Corner[41]"
  987.  Number:   41
  988.  Size:     18600 26000 2000
  989.  Position: 29450 0 34550
  990.  Type:     65535
  991.  Layer:    0
  992. End_Chunk
  993.  
  994. Children:
  995. ;
  996. ;-------Object   14-------------------------------------------------------
  997. ; 
  998. Chunk: Standard
  999.  Name:     "NW-Corner[14]"
  1000.  Number:   14
  1001.  Size:     5275 26000 2000
  1002.  Position: 13325 0 0
  1003.  Type:     8
  1004.  Layer:    0
  1005. End_Chunk
  1006. Chunk: Colours
  1007.  Number: 27
  1008.  0x00 0x7B 0x15 0x00 0x13 0x15 0x13 0x35 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  1009.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x00
  1010. End_Chunk
  1011. ;
  1012. ;-------Object   26-------------------------------------------------------
  1013. ; 
  1014. Chunk: Standard
  1015.  Name:     "NW-Corner[26]"
  1016.  Number:   26
  1017.  Size:     8050 26000 2000
  1018.  Position: 5275 0 0
  1019.  Type:     104
  1020.  Layer:    0
  1021.  OFlags:   Aa
  1022. End_Chunk
  1023. Chunk: SCL
  1024. /*
  1025.  
  1026.  
  1027.  
  1028.             if selected
  1029.  
  1030.             then set animation off.
  1031.  
  1032.  
  1033.  
  1034. */
  1035.  
  1036. if (activate (me, 0))
  1037.  
  1038.   animode (me, 1)=7;
  1039.  
  1040.  
  1041. end
  1042. End_Chunk
  1043. Chunk: Animations
  1044.  Number: 1
  1045.  Subchunk
  1046.   First:    1
  1047.   Last:     20
  1048.   Phase:    0x0100
  1049.   Velocity: 0x0100
  1050.   Mode:     0
  1051. End_Chunk
  1052. Chunk: Colours
  1053.  Number: 45
  1054.  0x00 0x7B 0x15 0x7B 0x79 0x7A 0x79 0x15 0x14 0x15 0x13 0x14 0x12 0x11 0x12 0x13
  1055.  0xBB 0x12 0x13 0x12 0x11 0xC0 0x37 0xE9 0x14 0x14 0x00 0x14 0x15 0x14 0x14 0x17
  1056.  0x18 0x16 0x13 0x15 0x15 0x00 0x64 0x63 0x65 0x00 0x62 0x63 0x67
  1057. End_Chunk
  1058. ;
  1059. ;-------Object   27-------------------------------------------------------
  1060. ; 
  1061. Chunk: Standard
  1062.  Name:     "NW-Corner[27]"
  1063.  Number:   27
  1064.  Size:     5275 26000 2000
  1065.  Position: 0 0 0
  1066.  Type:     8
  1067.  Layer:    0
  1068. End_Chunk
  1069. Chunk: Colours
  1070.  Number: 27
  1071.  0x00 0x7B 0x15 0x00 0x13 0x15 0x13 0x35 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  1072.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x00
  1073. End_Chunk
  1074.  
  1075. End_Children
  1076. ;
  1077. ;-------Object   39-------------------------------------------------------
  1078. ; 
  1079. Chunk: Standard
  1080.  Name:     "NW-Corner[39]"
  1081.  Number:   39
  1082.  Size:     10950 26000 12050
  1083.  Position: 48050 0 24500
  1084.  Type:     65535
  1085.  Layer:    0
  1086. End_Chunk
  1087.  
  1088. Children:
  1089. ;
  1090. ;-------Object   15-------------------------------------------------------
  1091. ; 
  1092. Chunk: Standard
  1093.  Name:     "NW-Corner[15]"
  1094.  Number:   15
  1095.  Size:     2000 26000 2000
  1096.  Position: 0 0 10050
  1097.  Type:     3
  1098.  Layer:    0
  1099. End_Chunk
  1100. Chunk: Colours
  1101.  Number: 9
  1102.  0x79 0x7A 0x00 0x00 0x3A 0x39 0x15 0x19 0x00
  1103. End_Chunk
  1104. ;
  1105. ;-------Object   16-------------------------------------------------------
  1106. ; 
  1107. Chunk: Standard
  1108.  Name:     "NW-Corner[16]"
  1109.  Number:   16
  1110.  Size:     2000 26000 8050
  1111.  Position: 0 0 2000
  1112.  Type:     7
  1113.  Layer:    0
  1114. End_Chunk
  1115. Chunk: Colours
  1116.  Number: 27
  1117.  0x52 0x78 0x19 0x00 0x13 0x15 0x13 0x35 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  1118.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x51
  1119. End_Chunk
  1120. ;
  1121. ;-------Object   17-------------------------------------------------------
  1122. ; 
  1123. Chunk: Standard
  1124.  Name:     "NW-Corner[17]"
  1125.  Number:   17
  1126.  Size:     2000 26000 2000
  1127.  Position: 0 0 0
  1128.  Type:     102
  1129.  Layer:    0
  1130. End_Chunk
  1131. Chunk: Colours
  1132.  Number: 6
  1133.  0x53 0x52 0x51 0x52 0x7A 0x78
  1134. End_Chunk
  1135. ;
  1136. ;-------Object   18-------------------------------------------------------
  1137. ; 
  1138. Chunk: Standard
  1139.  Name:     "NW-Corner[18]"
  1140.  Number:   18
  1141.  Size:     6950 26000 2000
  1142.  Position: 2000 0 0
  1143.  Type:     8
  1144.  Layer:    0
  1145. End_Chunk
  1146. Chunk: Colours
  1147.  Number: 27
  1148.  0x53 0x7A 0x17 0x00 0x13 0x15 0x13 0x35 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  1149.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x52
  1150. End_Chunk
  1151. ;
  1152. ;-------Object   19-------------------------------------------------------
  1153. ; 
  1154. Chunk: Standard
  1155.  Name:     "NW-Corner[19]"
  1156.  Number:   19
  1157.  Size:     2000 26000 2000
  1158.  Position: 8950 0 0
  1159.  Type:     3
  1160.  Layer:    0
  1161. End_Chunk
  1162. Chunk: Colours
  1163.  Number: 9
  1164.  0x79 0x79 0x51 0x52 0x52 0x53 0x17 0x19 0x00
  1165. End_Chunk
  1166.  
  1167. End_Children
  1168. ;
  1169. ;-------Object    5-------------------------------------------------------
  1170. ; 
  1171. Chunk: Standard
  1172.  Name:     "W-door"
  1173.  Number:   5
  1174.  Size:     2000 26000 8300
  1175.  Position: 0 0 4000
  1176.  Type:     65535
  1177.  Layer:    0
  1178. End_Chunk
  1179.  
  1180. Children:
  1181. ;
  1182. ;-------Object  294-------------------------------------------------------
  1183. ; 
  1184. Chunk: Standard
  1185.  Name:     "DoorSystem[294]"
  1186.  Number:   294
  1187.  Size:     8300 26000 2000
  1188.  Position: 0 0 0
  1189.  Type:     65535
  1190.  Layer:    0
  1191. End_Chunk
  1192. Chunk: Rotations
  1193.  Initial: 0x0000 0x4000 0x0000
  1194.  Centre:  4150 13000 4150
  1195. End_Chunk
  1196.  
  1197. Children:
  1198. ;
  1199. ;-------Object  295-------------------------------------------------------
  1200. ; 
  1201. Chunk: Standard
  1202.  Name:     "Frame-top[295]"
  1203.  Number:   295
  1204.  Size:     8300 700 1000
  1205.  Position: 0 19900 1000
  1206.  Type:     0
  1207.  Layer:    0
  1208. End_Chunk
  1209. Chunk: Colours
  1210.  Number: 9
  1211.  0xBC 0xBB 0x53 0x52 0x51 0x54 0xBE 0x12 0x10
  1212. End_Chunk
  1213. ;
  1214. ;-------Object  296-------------------------------------------------------
  1215. ; 
  1216. Chunk: Standard
  1217.  Name:     "Frame-top[296]"
  1218.  Number:   296
  1219.  Size:     8300 5400 1800
  1220.  Position: 0 20600 0
  1221.  Type:     0
  1222.  Layer:    0
  1223. End_Chunk
  1224. Chunk: Colours
  1225.  Number: 9
  1226.  0x12 0x19 0xB9 0x79 0xBC 0x1B 0xBE 0x12 0x10
  1227. End_Chunk
  1228. ;
  1229. ;-------Object  297-------------------------------------------------------
  1230. ; 
  1231. Chunk: Standard
  1232.  Name:     "Frame-left[297]"
  1233.  Number:   297
  1234.  Size:     664 19900 1000
  1235.  Position: 0 0 1000
  1236.  Type:     56
  1237.  Layer:    0
  1238. End_Chunk
  1239. Chunk: Colours
  1240.  Number: 6
  1241.  0x53 0xB9 0x53 0x52 0x00 0x00
  1242. End_Chunk
  1243. ;
  1244. ;-------Object  298-------------------------------------------------------
  1245. ; 
  1246. Chunk: Standard
  1247.  Name:     "Frame-right[298]"
  1248.  Number:   298
  1249.  Size:     664 19900 1000
  1250.  Position: 7636 0 1000
  1251.  Type:     56
  1252.  Layer:    0
  1253. End_Chunk
  1254. Chunk: Colours
  1255.  Number: 6
  1256.  0x53 0xB9 0x53 0x52 0x00 0x00
  1257. End_Chunk
  1258. ;
  1259. ;-------Object  299-------------------------------------------------------
  1260. ; 
  1261. Chunk: Standard
  1262.  Name:     "Door-Group[299]"
  1263.  Number:   299
  1264.  Size:     6972 19900 1200
  1265.  Position: 664 0 800
  1266.  Type:     65535
  1267.  Layer:    0
  1268. End_Chunk
  1269. Chunk: SCL
  1270. resume (0, 2);
  1271.  
  1272. if (activate (#300, 0))
  1273.  
  1274. {
  1275.  
  1276.   if (yrot (me)==0)
  1277.  
  1278.   {
  1279.  
  1280. /*  open door
  1281.  
  1282. *//*
  1283.  
  1284.  
  1285.  
  1286.  
  1287.  
  1288.     rotate handle
  1289.  
  1290. */
  1291.  
  1292.     repeat (6)
  1293.  
  1294.     {
  1295.  
  1296.       zrot (#304)+=5;
  1297.  
  1298.       zrot (#311)+=5;
  1299.  
  1300.       waitf;
  1301.  
  1302.     }
  1303.  
  1304.     zrot (#304)=0;
  1305.  
  1306.     zrot (#311)=0;
  1307.  
  1308. /*
  1309.  
  1310.  
  1311.  
  1312.     open dooor
  1313.  
  1314.  
  1315.  
  1316. */
  1317.  
  1318.     repeat (20)
  1319.  
  1320.     {
  1321.  
  1322.       yrot (me)-=4;
  1323.  
  1324.       waitf;
  1325.  
  1326.     }
  1327.  
  1328.   }
  1329.  
  1330.   else
  1331.  
  1332.   {
  1333.  
  1334.  
  1335.  
  1336. /*
  1337.  
  1338.  
  1339.  
  1340.  
  1341.  
  1342.  
  1343.  
  1344. close door sequence
  1345.  
  1346.  
  1347.  
  1348.  
  1349.  
  1350.  
  1351.  
  1352. */
  1353.  
  1354.     repeat (20)
  1355.  
  1356.     {
  1357.  
  1358.       yrot (me)+=4;
  1359.  
  1360.       waitf;
  1361.  
  1362.     }
  1363.  
  1364.   }
  1365.  
  1366.   clrtrig (#300, 0);
  1367.  
  1368. }
  1369. end
  1370. End_Chunk
  1371. Chunk: Rotations
  1372.  Initial: 0x0000 0x0000 0x0000
  1373.  Centre:  6972 9950 400
  1374. End_Chunk
  1375.  
  1376. Children:
  1377. ;
  1378. ;-------Object  300-------------------------------------------------------
  1379. ; 
  1380. Chunk: Standard
  1381.  Name:     "Door[300]"
  1382.  Number:   300
  1383.  Size:     6972 19900 400
  1384.  Position: 0 0 400
  1385.  Type:     75
  1386.  Layer:    0
  1387. End_Chunk
  1388. ;
  1389. ;-------Object  301-------------------------------------------------------
  1390. ; 
  1391. Chunk: Standard
  1392.  Name:     "Keyhole[301]"
  1393.  Number:   301
  1394.  Size:     332 1500 100
  1395.  Position: 262 7300 300
  1396.  Type:     65535
  1397.  Layer:    0
  1398. End_Chunk
  1399.  
  1400. Children:
  1401. ;
  1402. ;-------Object  302-------------------------------------------------------
  1403. ; 
  1404. Chunk: Standard
  1405.  Name:     "Keyhole[302]"
  1406.  Number:   302
  1407.  Size:     332 1500 100
  1408.  Position: 0 0 0
  1409.  Type:     76
  1410.  Layer:    0
  1411. End_Chunk
  1412. Chunk: Distancing
  1413.  Visible:   16600
  1414.  Invisible: 21250
  1415.  Replace:   303
  1416. End_Chunk
  1417. ;
  1418. ;-------Object  303-------------------------------------------------------
  1419. ; 
  1420. Chunk: Standard
  1421.  Name:     "Keyhole[303]"
  1422.  Number:   303
  1423.  Size:     332 1500 100
  1424.  Position: 0 0 0
  1425.  Type:     77
  1426.  Layer:    0
  1427.  DFlags:   R
  1428.  OFlags:   Ii
  1429. End_Chunk
  1430.  
  1431. End_Children
  1432. ;
  1433. ;-------Object  304-------------------------------------------------------
  1434. ; 
  1435. Chunk: Standard
  1436.  Name:     "Handle[304]"
  1437.  Number:   304
  1438.  Size:     996 300 300
  1439.  Position: 304 8238 0
  1440.  Type:     65535
  1441.  Layer:    0
  1442. End_Chunk
  1443. Chunk: Rotations
  1444.  Initial: 0x0000 0x0000 0x0000
  1445.  Centre:  124 150 150
  1446. End_Chunk
  1447.  
  1448. Children:
  1449. ;
  1450. ;-------Object  305-------------------------------------------------------
  1451. ; 
  1452. Chunk: Standard
  1453.  Name:     "Handle[305]"
  1454.  Number:   305
  1455.  Size:     996 300 300
  1456.  Position: 0 0 0
  1457.  Type:     78
  1458.  Layer:    0
  1459. End_Chunk
  1460. Chunk: Distancing
  1461.  Visible:   12450
  1462.  Invisible: 15937
  1463.  Replace:   306
  1464. End_Chunk
  1465. ;
  1466. ;-------Object  306-------------------------------------------------------
  1467. ; 
  1468. Chunk: Standard
  1469.  Name:     "Handle[306]"
  1470.  Number:   306
  1471.  Size:     996 300 300
  1472.  Position: 0 0 0
  1473.  Type:     79
  1474.  Layer:    0
  1475.  DFlags:   R
  1476.  OFlags:   Ii
  1477. End_Chunk
  1478. Chunk: Distancing
  1479.  Visible:   20750
  1480.  Invisible: 26562
  1481.  Replace:   307
  1482. End_Chunk
  1483. ;
  1484. ;-------Object  307-------------------------------------------------------
  1485. ; 
  1486. Chunk: Standard
  1487.  Name:     "Handle[307]"
  1488.  Number:   307
  1489.  Size:     996 300 300
  1490.  Position: 0 0 0
  1491.  Type:     80
  1492.  Layer:    0
  1493.  DFlags:   R
  1494.  OFlags:   Ii
  1495. End_Chunk
  1496.  
  1497. End_Children
  1498. ;
  1499. ;-------Object  308-------------------------------------------------------
  1500. ; 
  1501. Chunk: Standard
  1502.  Name:     "Keyhole[308]"
  1503.  Number:   308
  1504.  Size:     332 1500 100
  1505.  Position: 262 7300 800
  1506.  Type:     65535
  1507.  Layer:    0
  1508. End_Chunk
  1509.  
  1510. Children:
  1511. ;
  1512. ;-------Object  309-------------------------------------------------------
  1513. ; 
  1514. Chunk: Standard
  1515.  Name:     "Keyhole[309]"
  1516.  Number:   309
  1517.  Size:     332 1500 100
  1518.  Position: 0 0 0
  1519.  Type:     81
  1520.  Layer:    0
  1521. End_Chunk
  1522. Chunk: Distancing
  1523.  Visible:   16600
  1524.  Invisible: 21250
  1525.  Replace:   310
  1526. End_Chunk
  1527. ;
  1528. ;-------Object  310-------------------------------------------------------
  1529. ; 
  1530. Chunk: Standard
  1531.  Name:     "Keyhole[310]"
  1532.  Number:   310
  1533.  Size:     332 1500 100
  1534.  Position: 0 0 0
  1535.  Type:     82
  1536.  Layer:    0
  1537.  DFlags:   R
  1538.  OFlags:   Ii
  1539. End_Chunk
  1540.  
  1541. End_Children
  1542. ;
  1543. ;-------Object  311-------------------------------------------------------
  1544. ; 
  1545. Chunk: Standard
  1546.  Name:     "OtherHandle[311]"
  1547.  Number:   311
  1548.  Size:     996 300 300
  1549.  Position: 304 8238 900
  1550.  Type:     65535
  1551.  Layer:    0
  1552. End_Chunk
  1553. Chunk: Rotations
  1554.  Initial: 0x0000 0x0000 0x0000
  1555.  Centre:  124 150 150
  1556. End_Chunk
  1557.  
  1558. Children:
  1559. ;
  1560. ;-------Object  312-------------------------------------------------------
  1561. ; 
  1562. Chunk: Standard
  1563.  Name:     "Handle[312]"
  1564.  Number:   312
  1565.  Size:     996 300 300
  1566.  Position: 0 0 0
  1567.  Type:     83
  1568.  Layer:    0
  1569. End_Chunk
  1570. Chunk: Distancing
  1571.  Visible:   12450
  1572.  Invisible: 15937
  1573.  Replace:   313
  1574. End_Chunk
  1575. ;
  1576. ;-------Object  313-------------------------------------------------------
  1577. ; 
  1578. Chunk: Standard
  1579.  Name:     "Handle[313]"
  1580.  Number:   313
  1581.  Size:     996 300 300
  1582.  Position: 0 0 0
  1583.  Type:     84
  1584.  Layer:    0
  1585.  DFlags:   R
  1586.  OFlags:   Ii
  1587. End_Chunk
  1588. Chunk: Distancing
  1589.  Visible:   20750
  1590.  Invisible: 26562
  1591.  Replace:   314
  1592. End_Chunk
  1593. ;
  1594. ;-------Object  314-------------------------------------------------------
  1595. ; 
  1596. Chunk: Standard
  1597.  Name:     "Handle[314]"
  1598.  Number:   314
  1599.  Size:     996 300 300
  1600.  Position: 0 0 0
  1601.  Type:     85
  1602.  Layer:    0
  1603.  DFlags:   R
  1604.  OFlags:   Ii
  1605. End_Chunk
  1606.  
  1607. End_Children
  1608.  
  1609. End_Children
  1610.  
  1611. End_Children
  1612.  
  1613. End_Children
  1614. ;
  1615. ;-------Object   36-------------------------------------------------------
  1616. ; 
  1617. Chunk: Standard
  1618.  Name:     "W-door[36]"
  1619.  Number:   36
  1620.  Size:     2000 26000 18100
  1621.  Position: 0 0 12300
  1622.  Type:     65535
  1623.  Layer:    0
  1624. End_Chunk
  1625.  
  1626. Children:
  1627. ;
  1628. ;-------Object    3-------------------------------------------------------
  1629. ; 
  1630. Chunk: Standard
  1631.  Name:     "NW-Corner"
  1632.  Number:   3
  1633.  Size:     2000 26000 2000
  1634.  Position: 0 0 16100
  1635.  Type:     4
  1636.  Layer:    0
  1637. End_Chunk
  1638. Chunk: Colours
  1639.  Number: 9
  1640.  0x7A 0x7A 0x00 0x00 0x00 0x00 0x16 0x19 0x00
  1641. End_Chunk
  1642. ;
  1643. ;-------Object    4-------------------------------------------------------
  1644. ; 
  1645. Chunk: Standard
  1646.  Name:     "WestWindow"
  1647.  Number:   4
  1648.  Size:     2000 26000 11850
  1649.  Position: 0 0 3700
  1650.  Type:     105
  1651.  Layer:    0
  1652.  OFlags:   Aa
  1653. End_Chunk
  1654. Chunk: SCL
  1655. /*
  1656.  
  1657.  
  1658.  
  1659.             if selected
  1660.  
  1661.             then set animation off.
  1662.  
  1663.  
  1664.  
  1665. */
  1666.  
  1667. if (activate (me, 0))
  1668.  
  1669.   animode (me, 1)=7;
  1670.  
  1671.  
  1672. end
  1673. End_Chunk
  1674. Chunk: Animations
  1675.  Number: 1
  1676.  Subchunk
  1677.   First:    1
  1678.   Last:     20
  1679.   Phase:    0x0100
  1680.   Velocity: 0x0100
  1681.   Mode:     0
  1682. End_Chunk
  1683. Chunk: Colours
  1684.  Number: 45
  1685.  0x00 0x79 0x15 0x79 0x78 0x7A 0x78 0x15 0x14 0x15 0x13 0x14 0x12 0x11 0x12 0x13
  1686.  0xBB 0x12 0x13 0x12 0x11 0xC0 0x37 0xE9 0x14 0x14 0x00 0x14 0x15 0x14 0x14 0x18
  1687.  0x1A 0x18 0x17 0x19 0x19 0x00 0x64 0x63 0x65 0x00 0x62 0x63 0x67
  1688. End_Chunk
  1689. ;
  1690. ;-------Object    9-------------------------------------------------------
  1691. ; 
  1692. Chunk: Standard
  1693.  Name:     "WestWindow[9]"
  1694.  Number:   9
  1695.  Size:     2000 26000 550
  1696.  Position: 0 0 15550
  1697.  Type:     10
  1698.  Layer:    0
  1699. End_Chunk
  1700. Chunk: Colours
  1701.  Number: 27
  1702.  0x00 0x79 0x19 0x00 0x13 0x15 0x13 0x35 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  1703.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x00
  1704. End_Chunk
  1705. ;
  1706. ;-------Object    8-------------------------------------------------------
  1707. ; 
  1708. Chunk: Standard
  1709.  Name:     "W-door[8]"
  1710.  Number:   8
  1711.  Size:     2000 26000 3700
  1712.  Position: 0 0 0
  1713.  Type:     110
  1714.  Layer:    0
  1715. End_Chunk
  1716. Chunk: Colours
  1717.  Number: 27
  1718.  0x52 0x79 0x19 0x00 0x18 0x18 0x00 0x00 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  1719.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x51
  1720. End_Chunk
  1721.  
  1722. End_Children
  1723. ;
  1724. ;-------Object    7-------------------------------------------------------
  1725. ; 
  1726. Chunk: Standard
  1727.  Name:     "W-door[7]"
  1728.  Number:   7
  1729.  Size:     2000 26000 2000
  1730.  Position: 0 0 2000
  1731.  Type:     110
  1732.  Layer:    0
  1733. End_Chunk
  1734. Chunk: Colours
  1735.  Number: 27
  1736.  0x52 0x79 0x19 0x00 0x00 0x00 0x17 0x17 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  1737.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x51
  1738. End_Chunk
  1739. ;
  1740. ;-------Object   37-------------------------------------------------------
  1741. ; 
  1742. Chunk: Standard
  1743.  Name:     "SW-corner[37]"
  1744.  Number:   37
  1745.  Size:     59000 26000 2000
  1746.  Position: 0 0 0
  1747.  Type:     65535
  1748.  Layer:    0
  1749. End_Chunk
  1750.  
  1751. Children:
  1752. ;
  1753. ;-------Object    6-------------------------------------------------------
  1754. ; 
  1755. Chunk: Standard
  1756.  Name:     "SW-corner"
  1757.  Number:   6
  1758.  Size:     2000 26000 2000
  1759.  Position: 0 0 0
  1760.  Type:     6
  1761.  Layer:    0
  1762. End_Chunk
  1763. Chunk: Colours
  1764.  Number: 9
  1765.  0x79 0x7A 0x51 0x52 0x52 0x53 0x17 0x19 0x00
  1766. End_Chunk
  1767. ;
  1768. ;-------Object   25-------------------------------------------------------
  1769. ; 
  1770. Chunk: Standard
  1771.  Name:     "NW-Corner[25]"
  1772.  Number:   25
  1773.  Size:     15950 26000 2000
  1774.  Position: 2000 0 0
  1775.  Type:     9
  1776.  Layer:    0
  1777. End_Chunk
  1778. Chunk: Colours
  1779.  Number: 27
  1780.  0x53 0x7A 0x17 0x00 0x19 0x19 0x00 0x00 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  1781.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x52
  1782. End_Chunk
  1783. ;
  1784. ;-------Object    1-------------------------------------------------------
  1785. ; 
  1786. Chunk: Standard
  1787.  Name:     "DoorSystem"
  1788.  Number:   1
  1789.  Size:     8700 26000 2000
  1790.  Position: 17950 0 0
  1791.  Type:     65535
  1792.  Layer:    0
  1793. End_Chunk
  1794.  
  1795. Children:
  1796. ;
  1797. ;-------Object  119-------------------------------------------------------
  1798. ; 
  1799. Chunk: Standard
  1800.  Name:     "Frame-top"
  1801.  Number:   119
  1802.  Size:     8700 700 1000
  1803.  Position: 0 19900 1000
  1804.  Type:     0
  1805.  Layer:    0
  1806. End_Chunk
  1807. Chunk: Colours
  1808.  Number: 9
  1809.  0x52 0xBB 0xB9 0x53 0x52 0x54 0xBE 0x12 0x10
  1810. End_Chunk
  1811. ;
  1812. ;-------Object   24-------------------------------------------------------
  1813. ; 
  1814. Chunk: Standard
  1815.  Name:     "Frame-top[24]"
  1816.  Number:   24
  1817.  Size:     8700 5400 1800
  1818.  Position: 0 20600 0
  1819.  Type:     0
  1820.  Layer:    0
  1821. End_Chunk
  1822. Chunk: Colours
  1823.  Number: 9
  1824.  0x12 0x17 0xB9 0x7A 0xBC 0xBF 0xBE 0x12 0x10
  1825. End_Chunk
  1826. ;
  1827. ;-------Object  121-------------------------------------------------------
  1828. ; 
  1829. Chunk: Standard
  1830.  Name:     "Frame-left"
  1831.  Number:   121
  1832.  Size:     696 19900 1000
  1833.  Position: 0 0 1000
  1834.  Type:     56
  1835.  Layer:    0
  1836. End_Chunk
  1837. Chunk: Colours
  1838.  Number: 6
  1839.  0x52 0xB9 0x52 0x53 0x00 0x00
  1840. End_Chunk
  1841. ;
  1842. ;-------Object  225-------------------------------------------------------
  1843. ; 
  1844. Chunk: Standard
  1845.  Name:     "Frame-right"
  1846.  Number:   225
  1847.  Size:     696 19900 1000
  1848.  Position: 8004 0 1000
  1849.  Type:     56
  1850.  Layer:    0
  1851. End_Chunk
  1852. Chunk: Colours
  1853.  Number: 6
  1854.  0x52 0xB9 0xBC 0x53 0x00 0x00
  1855. End_Chunk
  1856. ;
  1857. ;-------Object  228-------------------------------------------------------
  1858. ; 
  1859. Chunk: Standard
  1860.  Name:     "Door-Group"
  1861.  Number:   228
  1862.  Size:     7308 19900 1200
  1863.  Position: 696 0 800
  1864.  Type:     65535
  1865.  Layer:    0
  1866. End_Chunk
  1867. Chunk: SCL
  1868. resume (0, 2);
  1869.  
  1870. if (activate (#229, 0))
  1871.  
  1872. {
  1873.  
  1874.   if (yrot (me)==0)
  1875.  
  1876.   {
  1877.  
  1878. /*  open door
  1879.  
  1880. *//*
  1881.  
  1882.  
  1883.  
  1884.  
  1885.  
  1886.     rotate handle
  1887.  
  1888. */
  1889.  
  1890.     repeat (6)
  1891.  
  1892.     {
  1893.  
  1894.       zrot (#233)+=5;
  1895.  
  1896.       zrot (#240)+=5;
  1897.  
  1898.       waitf;
  1899.  
  1900.     }
  1901.  
  1902.     zrot (#233)=0;
  1903.  
  1904.     zrot (#240)=0;
  1905.  
  1906. /*
  1907.  
  1908.  
  1909.  
  1910.     open dooor
  1911.  
  1912.  
  1913.  
  1914. */
  1915.  
  1916.     repeat (20)
  1917.  
  1918.     {
  1919.  
  1920.       yrot (me)-=4;
  1921.  
  1922.       waitf;
  1923.  
  1924.     }
  1925.  
  1926.   }
  1927.  
  1928.   else
  1929.  
  1930.   {
  1931.  
  1932.  
  1933.  
  1934. /*
  1935.  
  1936.  
  1937.  
  1938.  
  1939.  
  1940.  
  1941.  
  1942. close door sequence
  1943.  
  1944.  
  1945.  
  1946.  
  1947.  
  1948.  
  1949.  
  1950. */
  1951.  
  1952.     repeat (20)
  1953.  
  1954.     {
  1955.  
  1956.       yrot (me)+=4;
  1957.  
  1958.       waitf;
  1959.  
  1960.     }
  1961.  
  1962.   }
  1963.  
  1964.   clrtrig (#229, 0);
  1965.  
  1966. }
  1967. end
  1968. End_Chunk
  1969. Chunk: Rotations
  1970.  Initial: 0x0000 0x0000 0x0000
  1971.  Centre:  7308 9950 400
  1972. End_Chunk
  1973.  
  1974. Children:
  1975. ;
  1976. ;-------Object  229-------------------------------------------------------
  1977. ; 
  1978. Chunk: Standard
  1979.  Name:     "Door"
  1980.  Number:   229
  1981.  Size:     7308 19900 400
  1982.  Position: 0 0 400
  1983.  Type:     75
  1984.  Layer:    0
  1985. End_Chunk
  1986. ;
  1987. ;-------Object  230-------------------------------------------------------
  1988. ; 
  1989. Chunk: Standard
  1990.  Name:     "Keyhole"
  1991.  Number:   230
  1992.  Size:     348 1500 100
  1993.  Position: 275 7300 300
  1994.  Type:     65535
  1995.  Layer:    0
  1996. End_Chunk
  1997.  
  1998. Children:
  1999. ;
  2000. ;-------Object  231-------------------------------------------------------
  2001. ; 
  2002. Chunk: Standard
  2003.  Name:     "Keyhole[44]"
  2004.  Number:   231
  2005.  Size:     348 1500 100
  2006.  Position: 0 0 0
  2007.  Type:     76
  2008.  Layer:    0
  2009.  OFlags:   r
  2010. End_Chunk
  2011. Chunk: Distancing
  2012.  Visible:   17400
  2013.  Invisible: 21250
  2014.  Replace:   232
  2015. End_Chunk
  2016. ;
  2017. ;-------Object  232-------------------------------------------------------
  2018. ; 
  2019. Chunk: Standard
  2020.  Name:     "Keyhole[45]"
  2021.  Number:   232
  2022.  Size:     348 1500 100
  2023.  Position: 0 0 0
  2024.  Type:     77
  2025.  Layer:    0
  2026.  DFlags:   R
  2027.  OFlags:   Ii
  2028. End_Chunk
  2029.  
  2030. End_Children
  2031. ;
  2032. ;-------Object  233-------------------------------------------------------
  2033. ; 
  2034. Chunk: Standard
  2035.  Name:     "Handle"
  2036.  Number:   233
  2037.  Size:     1044 300 300
  2038.  Position: 319 8238 0
  2039.  Type:     65535
  2040.  Layer:    0
  2041. End_Chunk
  2042. Chunk: Rotations
  2043.  Initial: 0x0000 0x0000 0x0000
  2044.  Centre:  130 150 150
  2045. End_Chunk
  2046.  
  2047. Children:
  2048. ;
  2049. ;-------Object  234-------------------------------------------------------
  2050. ; 
  2051. Chunk: Standard
  2052.  Name:     "Handle[41]"
  2053.  Number:   234
  2054.  Size:     1044 300 300
  2055.  Position: 0 0 0
  2056.  Type:     78
  2057.  Layer:    0
  2058.  OFlags:   r
  2059. End_Chunk
  2060. Chunk: Distancing
  2061.  Visible:   13050
  2062.  Invisible: 15937
  2063.  Replace:   235
  2064. End_Chunk
  2065. ;
  2066. ;-------Object  235-------------------------------------------------------
  2067. ; 
  2068. Chunk: Standard
  2069.  Name:     "Handle[42]"
  2070.  Number:   235
  2071.  Size:     1044 300 300
  2072.  Position: 0 0 0
  2073.  Type:     79
  2074.  Layer:    0
  2075.  DFlags:   R
  2076.  OFlags:   rIi
  2077. End_Chunk
  2078. Chunk: Distancing
  2079.  Visible:   21750
  2080.  Invisible: 26562
  2081.  Replace:   236
  2082. End_Chunk
  2083. ;
  2084. ;-------Object  236-------------------------------------------------------
  2085. ; 
  2086. Chunk: Standard
  2087.  Name:     "Handle[43]"
  2088.  Number:   236
  2089.  Size:     1044 300 300
  2090.  Position: 0 0 0
  2091.  Type:     80
  2092.  Layer:    0
  2093.  DFlags:   R
  2094.  OFlags:   Ii
  2095. End_Chunk
  2096.  
  2097. End_Children
  2098. ;
  2099. ;-------Object  237-------------------------------------------------------
  2100. ; 
  2101. Chunk: Standard
  2102.  Name:     "Keyhole[39]"
  2103.  Number:   237
  2104.  Size:     348 1500 100
  2105.  Position: 275 7300 800
  2106.  Type:     65535
  2107.  Layer:    0
  2108. End_Chunk
  2109.  
  2110. Children:
  2111. ;
  2112. ;-------Object  238-------------------------------------------------------
  2113. ; 
  2114. Chunk: Standard
  2115.  Name:     "Keyhole[46]"
  2116.  Number:   238
  2117.  Size:     348 1500 100
  2118.  Position: 0 0 0
  2119.  Type:     81
  2120.  Layer:    0
  2121.  OFlags:   r
  2122. End_Chunk
  2123. Chunk: Distancing
  2124.  Visible:   17400
  2125.  Invisible: 21250
  2126.  Replace:   239
  2127. End_Chunk
  2128. ;
  2129. ;-------Object  239-------------------------------------------------------
  2130. ; 
  2131. Chunk: Standard
  2132.  Name:     "Keyhole[47]"
  2133.  Number:   239
  2134.  Size:     348 1500 100
  2135.  Position: 0 0 0
  2136.  Type:     82
  2137.  Layer:    0
  2138.  DFlags:   R
  2139.  OFlags:   Ii
  2140. End_Chunk
  2141.  
  2142. End_Children
  2143. ;
  2144. ;-------Object  240-------------------------------------------------------
  2145. ; 
  2146. Chunk: Standard
  2147.  Name:     "OtherHandle"
  2148.  Number:   240
  2149.  Size:     1044 300 300
  2150.  Position: 319 8238 900
  2151.  Type:     65535
  2152.  Layer:    0
  2153. End_Chunk
  2154. Chunk: Rotations
  2155.  Initial: 0x0000 0x0000 0x0000
  2156.  Centre:  130 150 150
  2157. End_Chunk
  2158.  
  2159. Children:
  2160. ;
  2161. ;-------Object  241-------------------------------------------------------
  2162. ; 
  2163. Chunk: Standard
  2164.  Name:     "Handle[48]"
  2165.  Number:   241
  2166.  Size:     1044 300 300
  2167.  Position: 0 0 0
  2168.  Type:     83
  2169.  Layer:    0
  2170.  OFlags:   r
  2171. End_Chunk
  2172. Chunk: Distancing
  2173.  Visible:   13050
  2174.  Invisible: 15937
  2175.  Replace:   242
  2176. End_Chunk
  2177. ;
  2178. ;-------Object  242-------------------------------------------------------
  2179. ; 
  2180. Chunk: Standard
  2181.  Name:     "Handle[49]"
  2182.  Number:   242
  2183.  Size:     1044 300 300
  2184.  Position: 0 0 0
  2185.  Type:     84
  2186.  Layer:    0
  2187.  DFlags:   R
  2188.  OFlags:   rIi
  2189. End_Chunk
  2190. Chunk: Distancing
  2191.  Visible:   21750
  2192.  Invisible: 26562
  2193.  Replace:   293
  2194. End_Chunk
  2195. ;
  2196. ;-------Object  293-------------------------------------------------------
  2197. ; 
  2198. Chunk: Standard
  2199.  Name:     "Handle[50]"
  2200.  Number:   293
  2201.  Size:     1044 300 300
  2202.  Position: 0 0 0
  2203.  Type:     85
  2204.  Layer:    0
  2205.  DFlags:   R
  2206.  OFlags:   Ii
  2207. End_Chunk
  2208.  
  2209. End_Children
  2210.  
  2211. End_Children
  2212.  
  2213. End_Children
  2214. ;
  2215. ;-------Object   23-------------------------------------------------------
  2216. ; 
  2217. Chunk: Standard
  2218.  Name:     "NW-Corner[23]"
  2219.  Number:   23
  2220.  Size:     30350 26000 2000
  2221.  Position: 26650 0 0
  2222.  Type:     9
  2223.  Layer:    0
  2224. End_Chunk
  2225. Chunk: Colours
  2226.  Number: 27
  2227.  0x00 0x7A 0x17 0x00 0x00 0x00 0x19 0x19 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  2228.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x00
  2229. End_Chunk
  2230. ;
  2231. ;-------Object   38-------------------------------------------------------
  2232. ; 
  2233. Chunk: Standard
  2234.  Name:     "NW-Corner[38]"
  2235.  Number:   38
  2236.  Size:     2000 26000 2000
  2237.  Position: 57000 0 0
  2238.  Type:     5
  2239.  Layer:    0
  2240. End_Chunk
  2241. Chunk: Colours
  2242.  Number: 9
  2243.  0x79 0x7A 0x37 0x36 0x3A 0x39 0x17 0x19 0x00
  2244. End_Chunk
  2245.  
  2246. End_Children
  2247. ;
  2248. ;-------Object   22-------------------------------------------------------
  2249. ; 
  2250. Chunk: Standard
  2251.  Name:     "NW-Corner[22]"
  2252.  Number:   22
  2253.  Size:     2000 26000 22500
  2254.  Position: 57000 0 2000
  2255.  Type:     65535
  2256.  Layer:    0
  2257. End_Chunk
  2258.  
  2259. Children:
  2260. ;
  2261. ;-------Object  315-------------------------------------------------------
  2262. ; 
  2263. Chunk: Standard
  2264.  Name:     "W-door[315]"
  2265.  Number:   315
  2266.  Size:     2000 26000 8300
  2267.  Position: 0 0 13850
  2268.  Type:     65535
  2269.  Layer:    0
  2270. End_Chunk
  2271.  
  2272. Children:
  2273. ;
  2274. ;-------Object  316-------------------------------------------------------
  2275. ; 
  2276. Chunk: Standard
  2277.  Name:     "DoorSystem[316]"
  2278.  Number:   316
  2279.  Size:     8300 26000 2000
  2280.  Position: 0 0 0
  2281.  Type:     65535
  2282.  Layer:    0
  2283.  DFlags:   r
  2284. End_Chunk
  2285. Chunk: Rotations
  2286.  Initial: 0x0000 0xFFFFC000 0x0000
  2287.  Centre:  1000 13000 1000
  2288. End_Chunk
  2289.  
  2290. Children:
  2291. ;
  2292. ;-------Object  317-------------------------------------------------------
  2293. ; 
  2294. Chunk: Standard
  2295.  Name:     "Frame-top[317]"
  2296.  Number:   317
  2297.  Size:     8300 700 1000
  2298.  Position: 0 19900 1000
  2299.  Type:     0
  2300.  Layer:    0
  2301. End_Chunk
  2302. Chunk: Colours
  2303.  Number: 9
  2304.  0x12 0xBB 0xB9 0x52 0xBC 0x54 0xBE 0x12 0x10
  2305. End_Chunk
  2306. ;
  2307. ;-------Object  318-------------------------------------------------------
  2308. ; 
  2309. Chunk: Standard
  2310.  Name:     "Frame-top[318]"
  2311.  Number:   318
  2312.  Size:     8300 5400 1800
  2313.  Position: 0 20600 0
  2314.  Type:     0
  2315.  Layer:    0
  2316. End_Chunk
  2317. Chunk: Colours
  2318.  Number: 9
  2319.  0x12 0x19 0xB9 0x79 0xBC 0x1B 0xBE 0x12 0x10
  2320. End_Chunk
  2321. ;
  2322. ;-------Object  319-------------------------------------------------------
  2323. ; 
  2324. Chunk: Standard
  2325.  Name:     "Frame-left[319]"
  2326.  Number:   319
  2327.  Size:     664 19900 1000
  2328.  Position: 0 0 1000
  2329.  Type:     56
  2330.  Layer:    0
  2331. End_Chunk
  2332. Chunk: Colours
  2333.  Number: 6
  2334.  0x53 0xB9 0x53 0x52 0x00 0x00
  2335. End_Chunk
  2336. ;
  2337. ;-------Object  320-------------------------------------------------------
  2338. ; 
  2339. Chunk: Standard
  2340.  Name:     "Frame-right[320]"
  2341.  Number:   320
  2342.  Size:     664 19900 1000
  2343.  Position: 7636 0 1000
  2344.  Type:     56
  2345.  Layer:    0
  2346. End_Chunk
  2347. Chunk: Colours
  2348.  Number: 6
  2349.  0x53 0xB9 0x53 0x52 0x00 0x00
  2350. End_Chunk
  2351. ;
  2352. ;-------Object  321-------------------------------------------------------
  2353. ; 
  2354. Chunk: Standard
  2355.  Name:     "Door-Group[321]"
  2356.  Number:   321
  2357.  Size:     6972 19900 1200
  2358.  Position: 664 0 800
  2359.  Type:     65535
  2360.  Layer:    0
  2361. End_Chunk
  2362. Chunk: SCL
  2363. resume (0, 2);
  2364.  
  2365. if (activate (#322, 0))
  2366.  
  2367. {
  2368.  
  2369.   if (yrot (me)==0)
  2370.  
  2371.   {
  2372.  
  2373. /*  open door
  2374.  
  2375. *//*
  2376.  
  2377.  
  2378.  
  2379.  
  2380.  
  2381.     rotate handle
  2382.  
  2383. */
  2384.  
  2385.     repeat (6)
  2386.  
  2387.     {
  2388.  
  2389.       zrot (#326)+=5;
  2390.  
  2391.       zrot (#333)+=5;
  2392.  
  2393.       waitf;
  2394.  
  2395.     }
  2396.  
  2397.     zrot (#326)=0;
  2398.  
  2399.     zrot (#333)=0;
  2400.  
  2401. /*
  2402.  
  2403.  
  2404.  
  2405.     open dooor
  2406.  
  2407.  
  2408.  
  2409. */
  2410.  
  2411.     repeat (20)
  2412.  
  2413.     {
  2414.  
  2415.       yrot (me)-=4;
  2416.  
  2417.       waitf;
  2418.  
  2419.     }
  2420.  
  2421.   }
  2422.  
  2423.   else
  2424.  
  2425.   {
  2426.  
  2427.  
  2428.  
  2429. /*
  2430.  
  2431.  
  2432.  
  2433.  
  2434.  
  2435.  
  2436.  
  2437. close door sequence
  2438.  
  2439.  
  2440.  
  2441.  
  2442.  
  2443.  
  2444.  
  2445. */
  2446.  
  2447.     repeat (20)
  2448.  
  2449.     {
  2450.  
  2451.       yrot (me)+=4;
  2452.  
  2453.       waitf;
  2454.  
  2455.     }
  2456.  
  2457.   }
  2458.  
  2459.   clrtrig (#322, 0);
  2460.  
  2461. }
  2462. end
  2463. End_Chunk
  2464. Chunk: Rotations
  2465.  Initial: 0x0000 0x0000 0x0000
  2466.  Centre:  6972 9950 400
  2467. End_Chunk
  2468.  
  2469. Children:
  2470. ;
  2471. ;-------Object  322-------------------------------------------------------
  2472. ; 
  2473. Chunk: Standard
  2474.  Name:     "Door[322]"
  2475.  Number:   322
  2476.  Size:     6972 19900 400
  2477.  Position: 0 0 400
  2478.  Type:     75
  2479.  Layer:    0
  2480. End_Chunk
  2481. Chunk: Colours
  2482.  Number: 47
  2483.  0x15 0x15 0x15 0x15 0x16 0x15 0x12 0x15 0x12 0x16 0x15 0x16 0x15 0x15 0x12 0x13
  2484.  0x13 0x13 0x13 0x13 0x13 0x14 0x12 0x14 0x17 0x14 0x14 0x14 0x16 0x15 0x11 0x15
  2485.  0x15 0x11 0x15 0x16 0x16 0x15 0x15 0x12 0x13 0x13 0x13 0x13 0x13 0x13 0x39
  2486. End_Chunk
  2487. ;
  2488. ;-------Object  323-------------------------------------------------------
  2489. ; 
  2490. Chunk: Standard
  2491.  Name:     "Keyhole[323]"
  2492.  Number:   323
  2493.  Size:     332 1500 100
  2494.  Position: 262 7300 300
  2495.  Type:     65535
  2496.  Layer:    0
  2497. End_Chunk
  2498.  
  2499. Children:
  2500. ;
  2501. ;-------Object  324-------------------------------------------------------
  2502. ; 
  2503. Chunk: Standard
  2504.  Name:     "Keyhole[324]"
  2505.  Number:   324
  2506.  Size:     332 1500 100
  2507.  Position: 0 0 0
  2508.  Type:     76
  2509.  Layer:    0
  2510. End_Chunk
  2511. Chunk: Distancing
  2512.  Visible:   16600
  2513.  Invisible: 21250
  2514.  Replace:   325
  2515. End_Chunk
  2516. ;
  2517. ;-------Object  325-------------------------------------------------------
  2518. ; 
  2519. Chunk: Standard
  2520.  Name:     "Keyhole[325]"
  2521.  Number:   325
  2522.  Size:     332 1500 100
  2523.  Position: 0 0 0
  2524.  Type:     77
  2525.  Layer:    0
  2526.  DFlags:   R
  2527.  OFlags:   Ii
  2528. End_Chunk
  2529.  
  2530. End_Children
  2531. ;
  2532. ;-------Object  326-------------------------------------------------------
  2533. ; 
  2534. Chunk: Standard
  2535.  Name:     "Handle[326]"
  2536.  Number:   326
  2537.  Size:     996 300 300
  2538.  Position: 304 8238 0
  2539.  Type:     65535
  2540.  Layer:    0
  2541. End_Chunk
  2542. Chunk: Rotations
  2543.  Initial: 0x0000 0x0000 0x0000
  2544.  Centre:  124 150 150
  2545. End_Chunk
  2546.  
  2547. Children:
  2548. ;
  2549. ;-------Object  327-------------------------------------------------------
  2550. ; 
  2551. Chunk: Standard
  2552.  Name:     "Handle[327]"
  2553.  Number:   327
  2554.  Size:     996 300 300
  2555.  Position: 0 0 0
  2556.  Type:     78
  2557.  Layer:    0
  2558. End_Chunk
  2559. Chunk: Distancing
  2560.  Visible:   12450
  2561.  Invisible: 15937
  2562.  Replace:   328
  2563. End_Chunk
  2564. ;
  2565. ;-------Object  328-------------------------------------------------------
  2566. ; 
  2567. Chunk: Standard
  2568.  Name:     "Handle[328]"
  2569.  Number:   328
  2570.  Size:     996 300 300
  2571.  Position: 0 0 0
  2572.  Type:     79
  2573.  Layer:    0
  2574.  DFlags:   R
  2575.  OFlags:   Ii
  2576. End_Chunk
  2577. Chunk: Distancing
  2578.  Visible:   20750
  2579.  Invisible: 26562
  2580.  Replace:   329
  2581. End_Chunk
  2582. ;
  2583. ;-------Object  329-------------------------------------------------------
  2584. ; 
  2585. Chunk: Standard
  2586.  Name:     "Handle[329]"
  2587.  Number:   329
  2588.  Size:     996 300 300
  2589.  Position: 0 0 0
  2590.  Type:     80
  2591.  Layer:    0
  2592.  DFlags:   R
  2593.  OFlags:   Ii
  2594. End_Chunk
  2595.  
  2596. End_Children
  2597. ;
  2598. ;-------Object  330-------------------------------------------------------
  2599. ; 
  2600. Chunk: Standard
  2601.  Name:     "Keyhole[330]"
  2602.  Number:   330
  2603.  Size:     332 1500 100
  2604.  Position: 262 7300 800
  2605.  Type:     65535
  2606.  Layer:    0
  2607. End_Chunk
  2608.  
  2609. Children:
  2610. ;
  2611. ;-------Object  331-------------------------------------------------------
  2612. ; 
  2613. Chunk: Standard
  2614.  Name:     "Keyhole[331]"
  2615.  Number:   331
  2616.  Size:     332 1500 100
  2617.  Position: 0 0 0
  2618.  Type:     81
  2619.  Layer:    0
  2620. End_Chunk
  2621. Chunk: Distancing
  2622.  Visible:   16600
  2623.  Invisible: 21250
  2624.  Replace:   332
  2625. End_Chunk
  2626. ;
  2627. ;-------Object  332-------------------------------------------------------
  2628. ; 
  2629. Chunk: Standard
  2630.  Name:     "Keyhole[332]"
  2631.  Number:   332
  2632.  Size:     332 1500 100
  2633.  Position: 0 0 0
  2634.  Type:     82
  2635.  Layer:    0
  2636.  DFlags:   R
  2637.  OFlags:   Ii
  2638. End_Chunk
  2639.  
  2640. End_Children
  2641. ;
  2642. ;-------Object  333-------------------------------------------------------
  2643. ; 
  2644. Chunk: Standard
  2645.  Name:     "OtherHandle[333]"
  2646.  Number:   333
  2647.  Size:     996 300 300
  2648.  Position: 304 8238 900
  2649.  Type:     65535
  2650.  Layer:    0
  2651. End_Chunk
  2652. Chunk: Rotations
  2653.  Initial: 0x0000 0x0000 0x0000
  2654.  Centre:  124 150 150
  2655. End_Chunk
  2656.  
  2657. Children:
  2658. ;
  2659. ;-------Object  334-------------------------------------------------------
  2660. ; 
  2661. Chunk: Standard
  2662.  Name:     "Handle[334]"
  2663.  Number:   334
  2664.  Size:     996 300 300
  2665.  Position: 0 0 0
  2666.  Type:     83
  2667.  Layer:    0
  2668. End_Chunk
  2669. Chunk: Distancing
  2670.  Visible:   12450
  2671.  Invisible: 15937
  2672.  Replace:   335
  2673. End_Chunk
  2674. ;
  2675. ;-------Object  335-------------------------------------------------------
  2676. ; 
  2677. Chunk: Standard
  2678.  Name:     "Handle[335]"
  2679.  Number:   335
  2680.  Size:     996 300 300
  2681.  Position: 0 0 0
  2682.  Type:     84
  2683.  Layer:    0
  2684.  DFlags:   R
  2685.  OFlags:   Ii
  2686. End_Chunk
  2687. Chunk: Distancing
  2688.  Visible:   20750
  2689.  Invisible: 26562
  2690.  Replace:   336
  2691. End_Chunk
  2692. ;
  2693. ;-------Object  336-------------------------------------------------------
  2694. ; 
  2695. Chunk: Standard
  2696.  Name:     "Handle[336]"
  2697.  Number:   336
  2698.  Size:     996 300 300
  2699.  Position: 0 0 0
  2700.  Type:     85
  2701.  Layer:    0
  2702.  DFlags:   R
  2703.  OFlags:   Ii
  2704. End_Chunk
  2705.  
  2706. End_Children
  2707.  
  2708. End_Children
  2709.  
  2710. End_Children
  2711.  
  2712. End_Children
  2713. ;
  2714. ;-------Object   20-------------------------------------------------------
  2715. ; 
  2716. Chunk: Standard
  2717.  Name:     "W-door[20]"
  2718.  Number:   20
  2719.  Size:     2000 26000 350
  2720.  Position: 0 0 22150
  2721.  Type:     111
  2722.  Layer:    0
  2723. End_Chunk
  2724. Chunk: Colours
  2725.  Number: 27
  2726.  0x52 0x79 0x19 0x14 0x17 0x17 0x00 0x00 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  2727.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x51
  2728. End_Chunk
  2729. ;
  2730. ;-------Object   21-------------------------------------------------------
  2731. ; 
  2732. Chunk: Standard
  2733.  Name:     "NW-Corner[21]"
  2734.  Number:   21
  2735.  Size:     2000 26000 13850
  2736.  Position: 0 0 0
  2737.  Type:     111
  2738.  Layer:    0
  2739. End_Chunk
  2740. Chunk: Colours
  2741.  Number: 27
  2742.  0x52 0x79 0x19 0x00 0x00 0x00 0x17 0x17 0x34 0x35 0x33 0x34 0x32 0x31 0x32 0x33
  2743.  0xBB 0x32 0x33 0x32 0x31 0xC0 0x37 0xE9 0x34 0x34 0x51
  2744. End_Chunk
  2745.  
  2746. End_Children
  2747. ;
  2748. ;-------Object   42-------------------------------------------------------
  2749. ; 
  2750. Chunk: Standard
  2751.  Name:     "floor-Group"
  2752.  Number:   42
  2753.  Size:     59000 0 36550
  2754.  Position: 0 0 0
  2755.  Type:     65535
  2756.  Layer:    0
  2757. End_Chunk
  2758. Chunk: Colours
  2759.  Number: 33
  2760.  0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F
  2761.  0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F 0x2F
  2762.  0xB9
  2763. End_Chunk
  2764.  
  2765. Children:
  2766. ;
  2767. ;-------Object   30-------------------------------------------------------
  2768. ; 
  2769. Chunk: Standard
  2770.  Name:     "floor"
  2771.  Number:   30
  2772.  Size:     26400 0 26400
  2773.  Position: 2000 0 2000
  2774.  Type:     2
  2775.  Layer:    0
  2776. End_Chunk
  2777. Chunk: Colours
  2778.  Number: 33
  2779.  0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x56 0x56 0x56 0x00 0x56 0x56 0x56
  2780.  0x00 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x56 0x00
  2781.  0x57
  2782. End_Chunk
  2783. ;
  2784. ;-------Object   33-------------------------------------------------------
  2785. ; 
  2786. Chunk: Standard
  2787.  Name:     "floor[33]"
  2788.  Number:   33
  2789.  Size:     3300 0 26400
  2790.  Position: 54800 0 2000
  2791.  Type:     12
  2792.  Layer:    0
  2793. End_Chunk
  2794. Chunk: Colours
  2795.  Number: 5
  2796.  0x00 0x56 0x00 0x00 0x57
  2797. End_Chunk
  2798. ;
  2799. ;-------Object   32-------------------------------------------------------
  2800. ; 
  2801. Chunk: Standard
  2802.  Name:     "floor[32]"
  2803.  Number:   32
  2804.  Size:     26400 0 6600
  2805.  Position: 28400 0 28400
  2806.  Type:     11
  2807.  Layer:    0
  2808. End_Chunk
  2809. Chunk: Colours
  2810.  Number: 9
  2811.  0x00 0x00 0x00 0x00 0x57 0x00 0x00 0x00 0x00
  2812. End_Chunk
  2813.  
  2814. End_Children
  2815. ;
  2816. ;-------Object  397-------------------------------------------------------
  2817. ; 
  2818. Chunk: Standard
  2819.  Name:     "NW-AREA"
  2820.  Number:   397
  2821.  Size:     17350 15000 15350
  2822.  Position: 2000 0 13050
  2823.  Type:     65535
  2824.  Layer:    0
  2825. End_Chunk
  2826.  
  2827. Children:
  2828. ;
  2829. ;-------Object   64-------------------------------------------------------
  2830. ; 
  2831. Chunk: Standard
  2832.  Name:     "Worktop"
  2833.  Number:   64
  2834.  Size:     6000 280 6000
  2835.  Position: 0 8820 0
  2836.  Type:     19
  2837.  Layer:    0
  2838. End_Chunk
  2839. Chunk: Colours
  2840.  Number: 9
  2841.  0x62 0x61 0x60 0x61 0x62 0x63 0x16 0x64 0x67
  2842. End_Chunk
  2843. ;
  2844. ;-------Object   35-------------------------------------------------------
  2845. ; 
  2846. Chunk: Standard
  2847.  Name:     "NFridge"
  2848.  Number:   35
  2849.  Size:     6000 8820 6000
  2850.  Position: 0 0 0
  2851.  Type:     65535
  2852.  Layer:    0
  2853. End_Chunk
  2854. Chunk: SCL
  2855. short  v00;
  2856.  
  2857.  
  2858. end
  2859. End_Chunk
  2860.  
  2861. Children:
  2862. ;
  2863. ;-------Object   62-------------------------------------------------------
  2864. ; 
  2865. Chunk: Standard
  2866.  Name:     "FloorUnit[62]"
  2867.  Number:   62
  2868.  Size:     4900 1500 6000
  2869.  Position: 0 0 0
  2870.  Type:     0
  2871.  Layer:    0
  2872. End_Chunk
  2873. Chunk: Colours
  2874.  Number: 6
  2875.  0x10 0xBC 0xBC 0x16 0x00 0x1A
  2876. End_Chunk
  2877. ;
  2878. ;-------Object  392-------------------------------------------------------
  2879. ; 
  2880. Chunk: Standard
  2881.  Name:     "FloorUnit[392]"
  2882.  Number:   392
  2883.  Size:     5600 1464 6000
  2884.  Position: 0 7356 0
  2885.  Type:     0
  2886.  Layer:    0
  2887. End_Chunk
  2888. Chunk: Colours
  2889.  Number: 6
  2890.  0x10 0xBC 0xBD 0x00 0x00 0x1A
  2891. End_Chunk
  2892. ;
  2893. ;-------Object  371-------------------------------------------------------
  2894. ; 
  2895. Chunk: Standard
  2896.  Name:     "NFridge[371]"
  2897.  Number:   371
  2898.  Size:     5600 5856 6000
  2899.  Position: 0 1500 0
  2900.  Type:     101
  2901.  Layer:    0
  2902. End_Chunk
  2903. Chunk: Colours
  2904.  Number: 10
  2905.  0x7F 0x16 0x1A 0x16 0xBC 0x00 0xBA 0x15 0x18 0x00
  2906. End_Chunk
  2907.  
  2908. Children:
  2909. ;
  2910. ;-------Object  405-------------------------------------------------------
  2911. ; 
  2912. Chunk: Standard
  2913.  Name:     "NFridge[405]"
  2914.  Number:   405
  2915.  Size:     3000 3500 3000
  2916.  Position: 1000 100 1000
  2917.  Type:     65535
  2918.  Layer:    0
  2919.  OFlags:   Ii
  2920. End_Chunk
  2921.  
  2922. Children:
  2923. ;
  2924. ;-------Object   74-------------------------------------------------------
  2925. ; 
  2926. Chunk: Standard
  2927.  Name:     "NFridge[74]"
  2928.  Number:   74
  2929.  Size:     1000 3500 1000
  2930.  Position: 0 0 0
  2931.  Type:     1
  2932.  Layer:    0
  2933. End_Chunk
  2934. ;
  2935. ;-------Object  216-------------------------------------------------------
  2936. ; 
  2937. Chunk: Standard
  2938.  Name:     "NFridge[216]"
  2939.  Number:   216
  2940.  Size:     1000 3500 1000
  2941.  Position: 1100 0 0
  2942.  Type:     1
  2943.  Layer:    0
  2944. End_Chunk
  2945. ;
  2946. ;-------Object  221-------------------------------------------------------
  2947. ; 
  2948. Chunk: Standard
  2949.  Name:     "NFridge[221]"
  2950.  Number:   221
  2951.  Size:     1000 3500 1000
  2952.  Position: 1100 0 1100
  2953.  Type:     1
  2954.  Layer:    0
  2955. End_Chunk
  2956. ;
  2957. ;-------Object  404-------------------------------------------------------
  2958. ; 
  2959. Chunk: Standard
  2960.  Name:     "NFridge[404]"
  2961.  Number:   404
  2962.  Size:     1000 3500 1000
  2963.  Position: 0 0 1100
  2964.  Type:     1
  2965.  Layer:    0
  2966. End_Chunk
  2967.  
  2968. End_Children
  2969.  
  2970. End_Children
  2971. ;
  2972. ;-------Object  227-------------------------------------------------------
  2973. ; 
  2974. Chunk: Standard
  2975.  Name:     "door hold[227]"
  2976.  Number:   227
  2977.  Size:     200 5856 6000
  2978.  Position: 5600 1500 0
  2979.  Type:     113
  2980.  Layer:    1
  2981. End_Chunk
  2982. Chunk: TexCoords
  2983.  Number: 1
  2984.  Mode:   0
  2985.  SubChunk
  2986.   Facet:     2
  2987.   ImageRef:  1
  2988.   PixScale:  0
  2989.   NumCoords: 4
  2990.     0.00000 0.00000
  2991.     0.00000 1.00000
  2992.     1.00000 1.00000
  2993.     1.00000 0.00000
  2994. End_Chunk
  2995. Chunk: Colours
  2996.  Number: 6
  2997.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  2998. End_Chunk
  2999.  
  3000. Chunk: ImageRef
  3001.  Number: 4
  3002.  Index: 1 Image: 1
  3003.  Index: 2 Image: 2
  3004.  Index: 3 Image: 3
  3005.  Index: 4 Image: 4
  3006. End_Chunk
  3007. Chunk: SCL
  3008. short  v00=-1, v01=20, v02=5, v03=5;
  3009.  
  3010.  
  3011.  
  3012. /*
  3013.  
  3014.  
  3015.  
  3016.     v00     determines which side the door is hinged.
  3017.  
  3018.     v01     specifies how many frames the opening sequence is played over.
  3019.  
  3020.     v02     sets how many degrees the door will turn per frame.
  3021.  
  3022.     v03     stores the initial rate.
  3023.  
  3024.  
  3025.  
  3026. */
  3027.  
  3028.  
  3029.  
  3030. resume (1, 1);
  3031.  
  3032. if (activate (me, 0) || activate (child (me), 0) || activate 
  3033.  
  3034.     (sibling (child (me)), 0) || activate (sibling (sibling 
  3035.  
  3036.     (child (me))), 0))
  3037.  
  3038. {
  3039.  
  3040. /*
  3041.  
  3042.             if textured door or replacement doors are activated....
  3043.  
  3044.  
  3045.  
  3046.             make bottles visible
  3047.  
  3048.  
  3049.  
  3050. */
  3051.  
  3052.   vis (#405);
  3053.  
  3054.   waitfs (3);
  3055.  
  3056. /*
  3057.  
  3058.  
  3059.  
  3060.             open/close door
  3061.  
  3062.  
  3063.  
  3064. */
  3065.  
  3066.   repeat (v01)
  3067.  
  3068.   {
  3069.  
  3070.     yrot (me)+=v02*v00;
  3071.  
  3072.     waitf;
  3073.  
  3074.   }
  3075.  
  3076. /*
  3077.  
  3078.  
  3079.  
  3080.             reverse direction setting of door for next use
  3081.  
  3082.  
  3083.  
  3084. */
  3085.  
  3086.   v02=-v02;
  3087.  
  3088. /*
  3089.  
  3090.  
  3091.  
  3092.             if door is closed then make bottles invisible
  3093.  
  3094.  
  3095.  
  3096. */
  3097.  
  3098.  
  3099.  
  3100.   if (v02==v03)
  3101.  
  3102.     invis (#405);
  3103.  
  3104.  
  3105.  
  3106. /*
  3107.  
  3108.  
  3109.  
  3110.             reset activate flag
  3111.  
  3112.  
  3113.  
  3114. */
  3115.  
  3116.   clrtrig (me, 0);
  3117.  
  3118.   clrtrig (child (me), 0);
  3119.  
  3120.   clrtrig (sibling (child (me)), 0);
  3121.  
  3122.   clrtrig (sibling (sibling (child (me))), 0);
  3123.  
  3124. }
  3125. end
  3126. End_Chunk
  3127. Chunk: Rotations
  3128.  Initial: 0x0000 0x0000 0x0000
  3129.  Centre:  100 2928 5850
  3130. End_Chunk
  3131.  
  3132. Children:
  3133. ;
  3134. ;-------Object  243-------------------------------------------------------
  3135. ; 
  3136. Chunk: Standard
  3137.  Name:     "door1st[243]"
  3138.  Number:   243
  3139.  Size:     200 5856 6000
  3140.  Position: 0 0 0
  3141.  Type:     67
  3142.  Layer:    0
  3143. End_Chunk
  3144. Chunk: Colours
  3145.  Number: 65
  3146.  0xBA 0xB7 0xBB 0xBB 0xB9 0xBB 0xBC 0xBD 0xBC 0xBB 0xBD 0xB8 0xBB 0xBC 0xB9 0xB9
  3147.  0xBB 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB9 0xB7 0xBB 0xBA 0xB9 0xBA 0xBB 0xBC 0xBC
  3148.  0xBB 0xBC 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xB8 0xB9 0xB9
  3149.  0xB8 0xB7 0xB6 0xB7 0xB7 0xB6 0xBB 0xBC 0xB8 0xB7 0xBC 0xBD 0x18 0xBD 0xB6 0xBB
  3150.  0xBE
  3151. End_Chunk
  3152. Chunk: Distancing
  3153.  Visible:   6000
  3154.  Invisible: 6666
  3155.  Replace:   244
  3156. End_Chunk
  3157. ;
  3158. ;-------Object  244-------------------------------------------------------
  3159. ; 
  3160. Chunk: Standard
  3161.  Name:     "door2nd[244]"
  3162.  Number:   244
  3163.  Size:     200 5856 6000
  3164.  Position: 0 0 0
  3165.  Type:     15
  3166.  Layer:    0
  3167. End_Chunk
  3168. Chunk: Colours
  3169.  Number: 65
  3170.  0xBA 0xB7 0xBB 0xBB 0xB9 0xBB 0xBC 0xBD 0xBC 0xBB 0xBD 0xB8 0xBB 0xBC 0xB9 0xB9
  3171.  0xBB 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB9 0xB7 0xBB 0xBA 0xB9 0xBA 0xBB 0xBC 0xBC
  3172.  0xBB 0xBC 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xB8 0xB9 0xB9
  3173.  0xB8 0xB7 0xB6 0xB7 0xB7 0xB6 0xBB 0xBC 0xB8 0xB7 0xBC 0xBD 0x18 0xBD 0xB6 0xB7
  3174.  0xBE
  3175. End_Chunk
  3176. Chunk: Distancing
  3177.  Visible:   8000
  3178.  Invisible: 8888
  3179.  Replace:   245
  3180. End_Chunk
  3181. ;
  3182. ;-------Object  245-------------------------------------------------------
  3183. ; 
  3184. Chunk: Standard
  3185.  Name:     "door3rd[245]"
  3186.  Number:   245
  3187.  Size:     200 5856 6000
  3188.  Position: 0 0 0
  3189.  Type:     68
  3190.  Layer:    0
  3191.  DFlags:   R
  3192.  OFlags:   i
  3193. End_Chunk
  3194. Chunk: Colours
  3195.  Number: 65
  3196.  0xBA 0xBA 0xBA 0xBB 0xBD 0xB8 0xB7 0xBB 0xBC 0xBB 0xBD 0xB8 0xBB 0xBC 0xB9 0xB9
  3197.  0xB7 0xBB 0xB8 0xB7 0xB8 0xB9 0xB8 0xB9 0xB7 0xBB 0xBB 0xB9 0xBA 0xBB 0xBC 0xBC
  3198.  0xBB 0xBC 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xB7 0xBB 0xBA
  3199.  0xBA 0xBA 0xBA 0xBA 0xBC 0xB7 0xBC 0xBA 0xB8 0xB7 0xBC 0xBD 0x18 0xBD 0xB6 0xB7
  3200.  0xBE
  3201. End_Chunk
  3202.  
  3203. End_Children
  3204. ;
  3205. ;-------Object  772-------------------------------------------------------
  3206. ; 
  3207. Chunk: Standard
  3208.  Name:     "NFridge[772]"
  3209.  Number:   772
  3210.  Size:     200 1464 6000
  3211.  Position: 5600 7356 0
  3212.  Type:     113
  3213.  Layer:    1
  3214. End_Chunk
  3215. Chunk: TexCoords
  3216.  Number: 1
  3217.  Mode:   0
  3218.  SubChunk
  3219.   Facet:     2
  3220.   ImageRef:  1
  3221.   PixScale:  0
  3222.   NumCoords: 4
  3223.     0.00000 0.00000
  3224.     0.00000 1.00000
  3225.     1.00000 1.00000
  3226.     1.00000 0.00000
  3227. End_Chunk
  3228. Chunk: Colours
  3229.  Number: 6
  3230.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  3231. End_Chunk
  3232.  
  3233. Chunk: ImageRef
  3234.  Number: 4
  3235.  Index: 1 Image: 1
  3236.  Index: 2 Image: 2
  3237.  Index: 3 Image: 3
  3238.  Index: 4 Image: 4
  3239. End_Chunk
  3240.  
  3241. Children:
  3242. ;
  3243. ;-------Object   69-------------------------------------------------------
  3244. ; 
  3245. Chunk: Standard
  3246.  Name:     "NFridge[69]"
  3247.  Number:   69
  3248.  Size:     200 1464 6000
  3249.  Position: 0 0 0
  3250.  Type:     21
  3251.  Layer:    0
  3252. End_Chunk
  3253. Chunk: Colours
  3254.  Number: 38
  3255.  0xBA 0xBE 0xBC 0xBD 0xBE 0xBD 0xBC 0xBE 0xB7 0xB6 0xB7 0xB8 0xB9 0xBB 0xB9 0xBB
  3256.  0xB8 0xB8 0xBB 0xBD 0xB6 0xBA 0xBB 0xBC 0xB9 0xBD 0xB9 0xBD 0xBD 0xBC 0xB8 0xB7
  3257.  0xB6 0xBC 0xB7 0xBB 0xBB 0xBB
  3258. End_Chunk
  3259.  
  3260. End_Children
  3261.  
  3262. End_Children
  3263. ;
  3264. ;-------Object  338-------------------------------------------------------
  3265. ; 
  3266. Chunk: Standard
  3267.  Name:     "SinkArea"
  3268.  Number:   338
  3269.  Size:     17350 12000 9350
  3270.  Position: 0 0 6000
  3271.  Type:     65535
  3272.  Layer:    0
  3273. End_Chunk
  3274.  
  3275. Children:
  3276. ;
  3277. ;-------Object  339-------------------------------------------------------
  3278. ; 
  3279. Chunk: Standard
  3280.  Name:     "Worktop[223]"
  3281.  Number:   339
  3282.  Size:     11350 280 700
  3283.  Position: 6000 8820 3350
  3284.  Type:     87
  3285.  Layer:    0
  3286. End_Chunk
  3287. Chunk: Colours
  3288.  Number: 9
  3289.  0x62 0x61 0x60 0x61 0x62 0x63 0x16 0x64 0x18
  3290. End_Chunk
  3291. ;
  3292. ;-------Object  340-------------------------------------------------------
  3293. ; 
  3294. Chunk: Standard
  3295.  Name:     "SinkUnit[70]"
  3296.  Number:   340
  3297.  Size:     8000 7356 6000
  3298.  Position: 9350 0 3350
  3299.  Type:     65535
  3300.  Layer:    0
  3301. End_Chunk
  3302. Chunk: SCL
  3303. long   x, y;
  3304.  
  3305.  
  3306. end
  3307. End_Chunk
  3308.  
  3309. Children:
  3310. ;
  3311. ;-------Object  386-------------------------------------------------------
  3312. ; 
  3313. Chunk: Standard
  3314.  Name:     "DrawerLineUnit[386]"
  3315.  Number:   386
  3316.  Size:     8000 5856 5600
  3317.  Position: 0 1500 400
  3318.  Type:     100
  3319.  Layer:    0
  3320. End_Chunk
  3321. Chunk: SCL
  3322. if (gvar (0, parent (me))!=0 || gvar (1, parent (me))!=0)
  3323.  
  3324.   vis (me);
  3325.  
  3326. else
  3327.  
  3328.   invis (me);
  3329.  
  3330.  
  3331. end
  3332. End_Chunk
  3333. Chunk: Colours
  3334.  Number: 10
  3335.  0x7F 0xBB 0xBF 0xBB 0x00 0x00 0xBA 0xB7 0xBD 0x00
  3336. End_Chunk
  3337. ;
  3338. ;-------Object  380-------------------------------------------------------
  3339. ; 
  3340. Chunk: Standard
  3341.  Name:     "door hold[380]"
  3342.  Number:   380
  3343.  Size:     4000 5856 200
  3344.  Position: 4000 1500 200
  3345.  Type:     113
  3346.  Layer:    1
  3347. End_Chunk
  3348. Chunk: TexCoords
  3349.  Number: 1
  3350.  Mode:   0
  3351.  SubChunk
  3352.   Facet:     1
  3353.   ImageRef:  1
  3354.   PixScale:  0
  3355.   NumCoords: 4
  3356.     0.00000 0.00000
  3357.     0.00000 1.00000
  3358.     1.00000 1.00000
  3359.     1.00000 0.00000
  3360. End_Chunk
  3361. Chunk: Colours
  3362.  Number: 6
  3363.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  3364. End_Chunk
  3365.  
  3366. Chunk: ImageRef
  3367.  Number: 4
  3368.  Index: 1 Image: 1
  3369.  Index: 2 Image: 2
  3370.  Index: 3 Image: 3
  3371.  Index: 4 Image: 4
  3372. End_Chunk
  3373. Chunk: SCL
  3374. short  v00=-1, v01=20, v02=5, v03=5;
  3375.  
  3376.  
  3377.  
  3378. resume (1, 1);
  3379.  
  3380. if (activate (me, 0) || activate (child (me), 0) || activate 
  3381.  
  3382.     (sibling (child (me)), 0) || activate (sibling (sibling 
  3383.  
  3384.     (child (me))), 0))
  3385.  
  3386. {
  3387.  
  3388.   gvar (0, parent (me))=1;
  3389.  
  3390.   waitfs (3);
  3391.  
  3392.   repeat (v01)
  3393.  
  3394.   {
  3395.  
  3396.     yrot (me)+=v02*v00;
  3397.  
  3398.     waitf;
  3399.  
  3400.   }
  3401.  
  3402.   v02=-v02;
  3403.  
  3404.   if (v02==v03)
  3405.  
  3406.     gvar (0, parent (me))=0;
  3407.  
  3408.   clrtrig (me, 0);
  3409.  
  3410.   clrtrig (child (me), 0);
  3411.  
  3412.   clrtrig (sibling (child (me)), 0);
  3413.  
  3414.   clrtrig (sibling (sibling (child (me))), 0);
  3415.  
  3416. }
  3417. end
  3418. End_Chunk
  3419. Chunk: Rotations
  3420.  Initial: 0x0000 0x0000 0x0000
  3421.  Centre:  4000 2928 195
  3422. End_Chunk
  3423.  
  3424. Children:
  3425. ;
  3426. ;-------Object  381-------------------------------------------------------
  3427. ; 
  3428. Chunk: Standard
  3429.  Name:     "door1st[381]"
  3430.  Number:   381
  3431.  Size:     4000 5856 200
  3432.  Position: 0 0 0
  3433.  Type:     27
  3434.  Layer:    0
  3435. End_Chunk
  3436. Chunk: Distancing
  3437.  Visible:   4000
  3438.  Invisible: 6375
  3439.  Replace:   382
  3440. End_Chunk
  3441. ;
  3442. ;-------Object  382-------------------------------------------------------
  3443. ; 
  3444. Chunk: Standard
  3445.  Name:     "door2nd[382]"
  3446.  Number:   382
  3447.  Size:     4000 5856 200
  3448.  Position: 0 0 0
  3449.  Type:     13
  3450.  Layer:    0
  3451. End_Chunk
  3452. Chunk: Distancing
  3453.  Visible:   5333
  3454.  Invisible: 8500
  3455.  Replace:   383
  3456. End_Chunk
  3457. ;
  3458. ;-------Object  383-------------------------------------------------------
  3459. ; 
  3460. Chunk: Standard
  3461.  Name:     "door3rd[383]"
  3462.  Number:   383
  3463.  Size:     4000 5856 200
  3464.  Position: 0 0 0
  3465.  Type:     69
  3466.  Layer:    0
  3467.  DFlags:   R
  3468.  OFlags:   i
  3469. End_Chunk
  3470.  
  3471. End_Children
  3472. ;
  3473. ;-------Object  341-------------------------------------------------------
  3474. ; 
  3475. Chunk: Standard
  3476.  Name:     "door hold[341]"
  3477.  Number:   341
  3478.  Size:     4000 5856 200
  3479.  Position: 0 1500 200
  3480.  Type:     113
  3481.  Layer:    1
  3482. End_Chunk
  3483. Chunk: TexCoords
  3484.  Number: 1
  3485.  Mode:   0
  3486.  SubChunk
  3487.   Facet:     1
  3488.   ImageRef:  1
  3489.   PixScale:  0
  3490.   NumCoords: 4
  3491.     0.00000 0.00000
  3492.     0.00000 1.00000
  3493.     1.00000 1.00000
  3494.     1.00000 0.00000
  3495. End_Chunk
  3496. Chunk: Colours
  3497.  Number: 6
  3498.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  3499. End_Chunk
  3500.  
  3501. Chunk: ImageRef
  3502.  Number: 4
  3503.  Index: 1 Image: 1
  3504.  Index: 2 Image: 2
  3505.  Index: 3 Image: 3
  3506.  Index: 4 Image: 4
  3507. End_Chunk
  3508. Chunk: SCL
  3509. short  v00=1, v01=20, v02=5, v03=5;
  3510.  
  3511.  
  3512.  
  3513. resume (1, 1);
  3514.  
  3515. if (activate (me, 0) || activate (child (me), 0) || activate 
  3516.  
  3517.     (sibling (child (me)), 0) || activate (sibling (sibling 
  3518.  
  3519.     (child (me))), 0))
  3520.  
  3521. {
  3522.  
  3523.   gvar (0, parent (me))=1;
  3524.  
  3525.   waitfs (3);
  3526.  
  3527.   repeat (v01)
  3528.  
  3529.   {
  3530.  
  3531.     yrot (me)+=v02*v00;
  3532.  
  3533.     waitf;
  3534.  
  3535.   }
  3536.  
  3537.   v02=-v02;
  3538.  
  3539.   if (v02==v03)
  3540.  
  3541.     gvar (0, parent (me))=0;
  3542.  
  3543.   clrtrig (me, 0);
  3544.  
  3545.   clrtrig (child (me), 0);
  3546.  
  3547.   clrtrig (sibling (child (me)), 0);
  3548.  
  3549.   clrtrig (sibling (sibling (child (me))), 0);
  3550.  
  3551. }
  3552. end
  3553. End_Chunk
  3554. Chunk: Rotations
  3555.  Initial: 0x0000 0x0000 0x0000
  3556.  Centre:  0 2928 195
  3557. End_Chunk
  3558.  
  3559. Children:
  3560. ;
  3561. ;-------Object  342-------------------------------------------------------
  3562. ; 
  3563. Chunk: Standard
  3564.  Name:     "door1st[342]"
  3565.  Number:   342
  3566.  Size:     4000 5856 200
  3567.  Position: 0 0 0
  3568.  Type:     27
  3569.  Layer:    0
  3570. End_Chunk
  3571. Chunk: Distancing
  3572.  Visible:   4000
  3573.  Invisible: 4250
  3574.  Replace:   384
  3575. End_Chunk
  3576. ;
  3577. ;-------Object  384-------------------------------------------------------
  3578. ; 
  3579. Chunk: Standard
  3580.  Name:     "door2nd[384]"
  3581.  Number:   384
  3582.  Size:     4000 5856 200
  3583.  Position: 0 0 0
  3584.  Type:     13
  3585.  Layer:    0
  3586. End_Chunk
  3587. Chunk: Distancing
  3588.  Visible:   5333
  3589.  Invisible: 5666
  3590.  Replace:   385
  3591. End_Chunk
  3592. ;
  3593. ;-------Object  385-------------------------------------------------------
  3594. ; 
  3595. Chunk: Standard
  3596.  Name:     "door3rd[385]"
  3597.  Number:   385
  3598.  Size:     4000 5856 200
  3599.  Position: 0 0 0
  3600.  Type:     69
  3601.  Layer:    0
  3602.  DFlags:   R
  3603.  OFlags:   i
  3604. End_Chunk
  3605.  
  3606. End_Children
  3607. ;
  3608. ;-------Object  343-------------------------------------------------------
  3609. ; 
  3610. Chunk: Standard
  3611.  Name:     "Dishwasher[43]"
  3612.  Number:   343
  3613.  Size:     8000 1500 4900
  3614.  Position: 0 0 1100
  3615.  Type:     0
  3616.  Layer:    0
  3617. End_Chunk
  3618. Chunk: Colours
  3619.  Number: 6
  3620.  0x00 0xBD 0x00 0x16 0x00 0x1A
  3621. End_Chunk
  3622.  
  3623. End_Children
  3624. ;
  3625. ;-------Object  768-------------------------------------------------------
  3626. ; 
  3627. Chunk: Standard
  3628.  Name:     "SinkUnit[768]"
  3629.  Number:   768
  3630.  Size:     4000 1464 200
  3631.  Position: 13350 7356 3550
  3632.  Type:     113
  3633.  Layer:    1
  3634. End_Chunk
  3635. Chunk: TexCoords
  3636.  Number: 1
  3637.  Mode:   0
  3638.  SubChunk
  3639.   Facet:     1
  3640.   ImageRef:  1
  3641.   PixScale:  0
  3642.   NumCoords: 4
  3643.     0.00000 0.00000
  3644.     0.00000 1.00000
  3645.     1.00000 1.00000
  3646.     1.00000 0.00000
  3647. End_Chunk
  3648. Chunk: Colours
  3649.  Number: 6
  3650.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  3651. End_Chunk
  3652.  
  3653. Chunk: ImageRef
  3654.  Number: 4
  3655.  Index: 1 Image: 1
  3656.  Index: 2 Image: 2
  3657.  Index: 3 Image: 3
  3658.  Index: 4 Image: 4
  3659. End_Chunk
  3660.  
  3661. Children:
  3662. ;
  3663. ;-------Object  344-------------------------------------------------------
  3664. ; 
  3665. Chunk: Standard
  3666.  Name:     "SinkUnit[74]"
  3667.  Number:   344
  3668.  Size:     4000 1464 200
  3669.  Position: 0 0 0
  3670.  Type:     14
  3671.  Layer:    0
  3672. End_Chunk
  3673.  
  3674. End_Children
  3675. ;
  3676. ;-------Object  769-------------------------------------------------------
  3677. ; 
  3678. Chunk: Standard
  3679.  Name:     "SinkUnit[769]"
  3680.  Number:   769
  3681.  Size:     4000 1464 200
  3682.  Position: 9350 7356 3550
  3683.  Type:     113
  3684.  Layer:    1
  3685. End_Chunk
  3686. Chunk: TexCoords
  3687.  Number: 1
  3688.  Mode:   0
  3689.  SubChunk
  3690.   Facet:     1
  3691.   ImageRef:  1
  3692.   PixScale:  0
  3693.   NumCoords: 4
  3694.     0.00000 0.00000
  3695.     0.00000 1.00000
  3696.     1.00000 1.00000
  3697.     1.00000 0.00000
  3698. End_Chunk
  3699. Chunk: Colours
  3700.  Number: 6
  3701.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  3702. End_Chunk
  3703.  
  3704. Chunk: ImageRef
  3705.  Number: 4
  3706.  Index: 1 Image: 1
  3707.  Index: 2 Image: 2
  3708.  Index: 3 Image: 3
  3709.  Index: 4 Image: 4
  3710. End_Chunk
  3711.  
  3712. Children:
  3713. ;
  3714. ;-------Object  345-------------------------------------------------------
  3715. ; 
  3716. Chunk: Standard
  3717.  Name:     "SinkUnit[73]"
  3718.  Number:   345
  3719.  Size:     4000 1464 200
  3720.  Position: 0 0 0
  3721.  Type:     14
  3722.  Layer:    0
  3723. End_Chunk
  3724.  
  3725. End_Children
  3726. ;
  3727. ;-------Object  346-------------------------------------------------------
  3728. ; 
  3729. Chunk: Standard
  3730.  Name:     "SinkUnit[239]"
  3731.  Number:   346
  3732.  Size:     9000 1930 5000
  3733.  Position: 8100 7356 4050
  3734.  Type:     65535
  3735.  Layer:    0
  3736. End_Chunk
  3737.  
  3738. Children:
  3739. ;
  3740. ;-------Object  347-------------------------------------------------------
  3741. ; 
  3742. Chunk: Standard
  3743.  Name:     "SinkUnit[158]"
  3744.  Number:   347
  3745.  Size:     9000 1930 5000
  3746.  Position: 0 0 0
  3747.  Type:     65535
  3748.  Layer:    0
  3749. End_Chunk
  3750. Chunk: Distancing
  3751.  Visible:   10000
  3752.  Invisible: 10625
  3753.  Replace:   354
  3754. End_Chunk
  3755.  
  3756. Children:
  3757. ;
  3758. ;-------Object  348-------------------------------------------------------
  3759. ; 
  3760. Chunk: Standard
  3761.  Name:     "sinkBowl"
  3762.  Number:   348
  3763.  Size:     4000 1500 5000
  3764.  Position: 5000 430 0
  3765.  Type:     88
  3766.  Layer:    0
  3767.  OFlags:   Aa
  3768. End_Chunk
  3769. Chunk: SCL
  3770. /*
  3771.  
  3772.  
  3773.  
  3774.             if on first animation cell
  3775.  
  3776.                 then ensure the facet representing
  3777.  
  3778.                 the water is invisible
  3779.  
  3780.             otherwise make it visible
  3781.  
  3782.  
  3783.  
  3784. */
  3785.  
  3786.  
  3787.  
  3788.  
  3789.  
  3790.  
  3791.  
  3792. if (ccel (me, 1)==1)
  3793.  
  3794.   setcol (0, 12, #348);
  3795.  
  3796. else
  3797.  
  3798.   setcol (0xF0, 12, #348);
  3799.  
  3800.  
  3801.  
  3802. /*
  3803.  
  3804.  
  3805.  
  3806.             if sink is selected when
  3807.  
  3808.             full (i.e. animation cell 20)
  3809.  
  3810.             then play animation so that
  3811.  
  3812.             the sink empties
  3813.  
  3814.  
  3815.  
  3816. */
  3817.  
  3818. if (activate (me, 0) & ccel (me, 1)==20)
  3819.  
  3820. {
  3821.  
  3822.   animode (me, 1)=7;
  3823.  
  3824.   animode (#355, 1)=7;
  3825.  
  3826. }
  3827. end
  3828. End_Chunk
  3829. Chunk: Animations
  3830.  Number: 1
  3831.  Subchunk
  3832.   First:    1
  3833.   Last:     20
  3834.   Phase:    0x0100
  3835.   Velocity: 0x0100
  3836.   Mode:     0
  3837. End_Chunk
  3838. Chunk: Colours
  3839.  Number: 118
  3840.  0x12 0x1A 0x1C 0x1E 0x1D 0x18 0x16 0x10 0x10 0x10 0x12 0x00 0x00 0x12 0x12 0x10
  3841.  0x12 0x12 0x12 0x1B 0x12 0x13 0x13 0x13 0x14 0x15 0x14 0x14 0x13 0x12 0x12 0x12
  3842.  0x1C 0x1C 0x1A 0x18 0x16 0x16 0x18 0x14 0x12 0x12 0x14 0x15 0x18 0x12 0x1C 0x1D
  3843.  0x12 0x12 0x12 0x13 0x14 0x14 0x14 0x14 0x13 0x13 0x13 0x13 0x1C 0x12 0x12 0x12
  3844.  0x1D 0x1B 0x18 0x18 0x15 0x13 0x12 0x11 0x13 0x17 0x17 0x17 0x17 0x19 0x1C 0x1C
  3845.  0x1B 0x1B 0x19 0x17 0x16 0x15 0x12 0x10 0x10 0x10 0x12 0x14 0x15 0x15 0x16 0x18
  3846.  0x14 0x10 0x01 0x13 0x62 0x62 0x62 0x62 0x62 0x13 0x13 0x13 0x17 0x13 0x12 0x12
  3847.  0x13 0x13 0x1C 0x1C 0x13 0x62
  3848. End_Chunk
  3849.  
  3850. Children:
  3851. ;
  3852. ;-------Object  365-------------------------------------------------------
  3853. ; 
  3854. Chunk: Standard
  3855.  Name:     "flow"
  3856.  Number:   365
  3857.  Size:     200 1500 200
  3858.  Position: 1711 0 3592
  3859.  Type:     112
  3860.  Layer:    0
  3861.  OFlags:   AaIi
  3862. End_Chunk
  3863. Chunk: Animations
  3864.  Number: 1
  3865.  Subchunk
  3866.   First:    1
  3867.   Last:     7
  3868.   Phase:    0x0100
  3869.   Velocity: 0x0100
  3870.   Mode:     0
  3871. End_Chunk
  3872. Chunk: SCL
  3873. if (ccel (me, 1)==1)
  3874.  
  3875.   setcol (0, 12, #365);
  3876.  
  3877. else
  3878.  
  3879.   setcol (0xF0, 12, #365);
  3880.  
  3881. if (activate (me, 0) & ccel (me, 1)==20)
  3882.  
  3883.   animode (me, 1)=7;
  3884.  
  3885.  
  3886. end
  3887. End_Chunk
  3888. Chunk: Colours
  3889.  Number: 118
  3890.  0xF0 0xF0 0xF0 0xF0 0xF0 0x18 0x16 0x10 0x10 0x10 0x12 0x00 0x00 0x12 0x12 0x10
  3891.  0x12 0x12 0x12 0x1B 0x12 0x13 0x13 0x13 0x14 0x15 0x14 0x14 0x13 0x12 0x12 0x12
  3892.  0x1C 0x1C 0x1A 0x18 0x16 0x16 0x18 0x14 0x12 0x12 0x14 0x15 0x18 0x12 0x1C 0x1D
  3893.  0x12 0x12 0x12 0x13 0x14 0x14 0x14 0x14 0x13 0x13 0x13 0x13 0x1C 0x12 0x12 0x12
  3894.  0x1D 0x1B 0x18 0x18 0x15 0x13 0x12 0x11 0x13 0x17 0x17 0x17 0x17 0x19 0x1C 0x1C
  3895.  0x1B 0x1B 0x19 0x17 0x16 0x15 0x12 0x10 0x10 0x10 0x12 0x14 0x15 0x15 0x16 0x18
  3896.  0x14 0x10 0x01 0x13 0x62 0x62 0x62 0x62 0x62 0x13 0x13 0x13 0x17 0x13 0x12 0x12
  3897.  0x13 0x13 0x1C 0x1C 0x13 0x62
  3898. End_Chunk
  3899.  
  3900. End_Children
  3901. ;
  3902. ;-------Object  349-------------------------------------------------------
  3903. ; 
  3904. Chunk: Standard
  3905.  Name:     "sinkBowl[163]"
  3906.  Number:   349
  3907.  Size:     4000 1500 5000
  3908.  Position: 0 430 0
  3909.  Type:     89
  3910.  Layer:    0
  3911. End_Chunk
  3912. Chunk: Colours
  3913.  Number: 118
  3914.  0x12 0x17 0x17 0x17 0x15 0x14 0x13 0x12 0x11 0x11 0x12 0x12 0x62 0x12 0x13 0x11
  3915.  0x12 0x12 0x12 0x1B 0x12 0x12 0x12 0x11 0x11 0x11 0x12 0x12 0x12 0x12 0x12 0x12
  3916.  0x1B 0x1B 0x1C 0x19 0x18 0x18 0x17 0x16 0x13 0x13 0x15 0x17 0x13 0x12 0x16 0x18
  3917.  0x12 0x12 0x12 0x12 0x12 0x12 0x12 0x11 0x11 0x12 0x12 0x15 0x1B 0x12 0x12 0x12
  3918.  0x16 0x15 0x13 0x13 0x11 0x10 0x10 0x10 0x11 0x13 0x14 0x15 0x16 0x16 0x17 0x17
  3919.  0x62 0x62 0xD9 0xDA 0xDB 0xDC 0xDD 0xDE 0xDF 0xE0 0xE1 0xE2 0xE3 0xE4 0xE5 0xE6
  3920.  0xE7 0x17 0x2F 0x11 0x31 0x62 0x62 0x62 0x62 0x12 0x12 0x12 0x14 0x12 0x12 0x11
  3921.  0x13 0x12 0x18 0x1B 0x13 0x62
  3922. End_Chunk
  3923. ;
  3924. ;-------Object  350-------------------------------------------------------
  3925. ; 
  3926. Chunk: Standard
  3927.  Name:     "sinkBowl[160]"
  3928.  Number:   350
  3929.  Size:     500 1500 5000
  3930.  Position: 4500 430 0
  3931.  Type:     65535
  3932.  Layer:    0
  3933. End_Chunk
  3934.  
  3935. Children:
  3936. ;
  3937. ;-------Object  351-------------------------------------------------------
  3938. ; 
  3939. Chunk: Standard
  3940.  Name:     "sinkBowl[159]"
  3941.  Number:   351
  3942.  Size:     500 1500 5000
  3943.  Position: 0 0 0
  3944.  Type:     90
  3945.  Layer:    0
  3946. End_Chunk
  3947.  
  3948. End_Children
  3949. ;
  3950. ;-------Object  352-------------------------------------------------------
  3951. ; 
  3952. Chunk: Standard
  3953.  Name:     "sinkBowl[161]"
  3954.  Number:   352
  3955.  Size:     500 1500 5000
  3956.  Position: 4000 430 0
  3957.  Type:     65535
  3958.  Layer:    0
  3959. End_Chunk
  3960.  
  3961. Children:
  3962. ;
  3963. ;-------Object  353-------------------------------------------------------
  3964. ; 
  3965. Chunk: Standard
  3966.  Name:     "sinkBowl[162]"
  3967.  Number:   353
  3968.  Size:     500 1500 5000
  3969.  Position: 0 0 0
  3970.  Type:     91
  3971.  Layer:    0
  3972. End_Chunk
  3973.  
  3974. End_Children
  3975.  
  3976. End_Children
  3977. ;
  3978. ;-------Object  354-------------------------------------------------------
  3979. ; 
  3980. Chunk: Standard
  3981.  Name:     "SinkUnit[232]"
  3982.  Number:   354
  3983.  Size:     9000 1930 5000
  3984.  Position: 0 0 0
  3985.  Type:     65535
  3986.  Layer:    0
  3987.  DFlags:   R
  3988.  OFlags:   Ii
  3989. End_Chunk
  3990.  
  3991. Children:
  3992. ;
  3993. ;-------Object  355-------------------------------------------------------
  3994. ; 
  3995. Chunk: Standard
  3996.  Name:     "sinkBowl[233]"
  3997.  Number:   355
  3998.  Size:     4000 1500 5000
  3999.  Position: 5000 430 0
  4000.  Type:     92
  4001.  Layer:    0
  4002.  OFlags:   Aa
  4003. End_Chunk
  4004. Chunk: SCL
  4005. if (ccel (me, 1)==1)
  4006.  
  4007.   setcol (0, 9, #355);
  4008.  
  4009. else
  4010.  
  4011.   setcol (0xF0, 9, #355);
  4012.  
  4013. if (activate (me, 0) & ccel (me, 1)==20)
  4014.  
  4015. {
  4016.  
  4017.   animode (me, 1)=7;
  4018.  
  4019.   animode (#348, 1)=7;
  4020.  
  4021. }
  4022. end
  4023. End_Chunk
  4024. Chunk: Animations
  4025.  Number: 1
  4026.  Subchunk
  4027.   First:    1
  4028.   Last:     20
  4029.   Phase:    0x0100
  4030.   Velocity: 0x0100
  4031.   Mode:     0
  4032. End_Chunk
  4033. Chunk: Colours
  4034.  Number: 118
  4035.  0x12 0x1A 0x62 0x1E 0x62 0x18 0x62 0x10 0x00 0x10 0x12 0x1C 0x1C 0x12 0x12 0x10
  4036.  0x12 0x12 0x12 0x1B 0x12 0x13 0x13 0x15 0x14 0x15 0x14 0x14 0x13 0x12 0x12 0x12
  4037.  0x1A 0x19 0x1A 0x18 0x17 0x17 0x13 0x13 0x14 0x13 0x12 0x12 0x12 0x1B 0x19 0x17
  4038.  0x13 0x11 0x13 0x17 0x15 0x13 0x14 0x14 0x13 0x13 0x13 0x13 0x1C 0x12 0x12 0x12
  4039.  0x1D 0x1B 0x18 0x18 0x15 0x13 0x12 0x11 0x13 0x17 0x17 0x17 0x17 0x19 0x1C 0x1C
  4040.  0x1B 0x1B 0x19 0x17 0x16 0x15 0x12 0x10 0x10 0x10 0x12 0x14 0x15 0x15 0x16 0x18
  4041.  0x13 0x13 0x13 0x13 0x31 0x62 0x62 0x62 0x62 0x13 0x13 0x13 0x17 0x13 0x12 0x12
  4042.  0x13 0x13 0x1C 0x1C 0x13 0x62
  4043. End_Chunk
  4044.  
  4045. Children:
  4046. ;
  4047. ;-------Object  367-------------------------------------------------------
  4048. ; 
  4049. Chunk: Standard
  4050.  Name:     "flow[367]"
  4051.  Number:   367
  4052.  Size:     200 1500 200
  4053.  Position: 1711 0 3592
  4054.  Type:     112
  4055.  Layer:    0
  4056.  OFlags:   AaIi
  4057. End_Chunk
  4058. Chunk: Animations
  4059.  Number: 1
  4060.  Subchunk
  4061.   First:    1
  4062.   Last:     7
  4063.   Phase:    0x0100
  4064.   Velocity: 0x0100
  4065.   Mode:     0
  4066. End_Chunk
  4067. Chunk: SCL
  4068. if (ccel (me, 1)==1)
  4069.  
  4070.   setcol (0, 12, #367);
  4071.  
  4072. else
  4073.  
  4074.   setcol (0xF0, 12, #367);
  4075.  
  4076. if (activate (me, 0) & ccel (me, 1)==20)
  4077.  
  4078.   animode (me, 1)=7;
  4079.  
  4080.  
  4081. end
  4082. End_Chunk
  4083. Chunk: Colours
  4084.  Number: 118
  4085.  0xF0 0xF0 0xF0 0xF0 0xF0 0x18 0x16 0x10 0x10 0x10 0x12 0x00 0x00 0x12 0x12 0x10
  4086.  0x12 0x12 0x12 0x1B 0x12 0x13 0x13 0x13 0x14 0x15 0x14 0x14 0x13 0x12 0x12 0x12
  4087.  0x1C 0x1C 0x1A 0x18 0x16 0x16 0x18 0x14 0x12 0x12 0x14 0x15 0x18 0x12 0x1C 0x1D
  4088.  0x12 0x12 0x12 0x13 0x14 0x14 0x14 0x14 0x13 0x13 0x13 0x13 0x1C 0x12 0x12 0x12
  4089.  0x1D 0x1B 0x18 0x18 0x15 0x13 0x12 0x11 0x13 0x17 0x17 0x17 0x17 0x19 0x1C 0x1C
  4090.  0x1B 0x1B 0x19 0x17 0x16 0x15 0x12 0x10 0x10 0x10 0x12 0x14 0x15 0x15 0x16 0x18
  4091.  0x14 0x10 0x01 0x13 0x62 0x62 0x62 0x62 0x62 0x13 0x13 0x13 0x17 0x13 0x12 0x12
  4092.  0x13 0x13 0x1C 0x1C 0x13 0x62
  4093. End_Chunk
  4094.  
  4095. End_Children
  4096. ;
  4097. ;-------Object  356-------------------------------------------------------
  4098. ; 
  4099. Chunk: Standard
  4100.  Name:     "sinkBowl[234]"
  4101.  Number:   356
  4102.  Size:     4000 1500 5000
  4103.  Position: 0 430 0
  4104.  Type:     93
  4105.  Layer:    0
  4106. End_Chunk
  4107. Chunk: Colours
  4108.  Number: 118
  4109.  0x12 0x62 0x62 0x62 0x62 0x62 0x13 0x15 0x11 0x11 0x18 0x19 0x18 0x16 0x1B 0x13
  4110.  0x13 0x13 0x12 0x12 0x12 0x12 0x12 0x11 0x11 0x17 0x17 0x12 0x12 0x12 0x12 0x12
  4111.  0x1B 0x1B 0x1C 0x19 0x18 0x18 0x17 0x16 0x13 0x13 0x15 0x17 0x13 0x12 0x16 0x18
  4112.  0x12 0x12 0x12 0x12 0x12 0x12 0x12 0x11 0x11 0x12 0x12 0x15 0x1B 0x12 0x12 0x12
  4113.  0x16 0x15 0x13 0x13 0x11 0x10 0x10 0x10 0x11 0x13 0x14 0x15 0x16 0x16 0x17 0x17
  4114.  0xD7 0xD8 0xD9 0xDA 0xDB 0xDC 0xDD 0xDE 0xDF 0xE0 0xE1 0xE2 0xE3 0xE4 0xE5 0xE6
  4115.  0xE7 0x17 0x2F 0x11 0x31 0x62 0x62 0x62 0x62 0x12 0x12 0x12 0x14 0x12 0x12 0x11
  4116.  0x13 0x12 0x18 0x1B 0x13 0x62
  4117. End_Chunk
  4118. ;
  4119. ;-------Object  357-------------------------------------------------------
  4120. ; 
  4121. Chunk: Standard
  4122.  Name:     "sinkBowl[235]"
  4123.  Number:   357
  4124.  Size:     500 1500 5000
  4125.  Position: 4500 430 0
  4126.  Type:     65535
  4127.  Layer:    0
  4128. End_Chunk
  4129.  
  4130. Children:
  4131. ;
  4132. ;-------Object  358-------------------------------------------------------
  4133. ; 
  4134. Chunk: Standard
  4135.  Name:     "sinkBowl[236]"
  4136.  Number:   358
  4137.  Size:     500 1500 5000
  4138.  Position: 0 0 0
  4139.  Type:     94
  4140.  Layer:    0
  4141. End_Chunk
  4142. Chunk: Colours
  4143.  Number: 23
  4144.  0x15 0x15 0x12 0x19 0x17 0x13 0x13 0x12 0x13 0x13 0x13 0x17 0x16 0x1E 0x17 0x1B
  4145.  0x13 0x13 0x12 0x12 0x19 0x12 0x14
  4146. End_Chunk
  4147.  
  4148. End_Children
  4149. ;
  4150. ;-------Object  359-------------------------------------------------------
  4151. ; 
  4152. Chunk: Standard
  4153.  Name:     "sinkBowl[237]"
  4154.  Number:   359
  4155.  Size:     500 1500 5000
  4156.  Position: 4000 430 0
  4157.  Type:     65535
  4158.  Layer:    0
  4159. End_Chunk
  4160.  
  4161. Children:
  4162. ;
  4163. ;-------Object  360-------------------------------------------------------
  4164. ; 
  4165. Chunk: Standard
  4166.  Name:     "sinkBowl[238]"
  4167.  Number:   360
  4168.  Size:     500 1500 5000
  4169.  Position: 0 0 0
  4170.  Type:     95
  4171.  Layer:    0
  4172. End_Chunk
  4173. Chunk: Colours
  4174.  Number: 23
  4175.  0x15 0x13 0x17 0x19 0x17 0x13 0x12 0x13 0x13 0x13 0x13 0x17 0x17 0x1E 0x1E 0x1B
  4176.  0x13 0x13 0x12 0x12 0x17 0x12 0x14
  4177. End_Chunk
  4178.  
  4179. End_Children
  4180.  
  4181. End_Children
  4182.  
  4183. End_Children
  4184. ;
  4185. ;-------Object  379-------------------------------------------------------
  4186. ; 
  4187. Chunk: Standard
  4188.  Name:     "SinkUnit[379]"
  4189.  Number:   379
  4190.  Size:     250 280 5300
  4191.  Position: 17100 8820 4050
  4192.  Type:     0
  4193.  Layer:    0
  4194. End_Chunk
  4195. Chunk: Colours
  4196.  Number: 6
  4197.  0x10 0x12 0x14 0x16 0x62 0x1A
  4198. End_Chunk
  4199. ;
  4200. ;-------Object  361-------------------------------------------------------
  4201. ; 
  4202. Chunk: Standard
  4203.  Name:     "Worktop[361]"
  4204.  Number:   361
  4205.  Size:     6000 280 6000
  4206.  Position: 0 8820 3350
  4207.  Type:     0
  4208.  Layer:    0
  4209. End_Chunk
  4210. Chunk: Colours
  4211.  Number: 9
  4212.  0x62 0x00 0x60 0x61 0x62 0x63 0x16 0x64 0x18
  4213. End_Chunk
  4214. ;
  4215. ;-------Object  362-------------------------------------------------------
  4216. ; 
  4217. Chunk: Standard
  4218.  Name:     "Worktop[362]"
  4219.  Number:   362
  4220.  Size:     2100 280 5300
  4221.  Position: 6000 8820 4050
  4222.  Type:     0
  4223.  Layer:    0
  4224. End_Chunk
  4225. Chunk: Colours
  4226.  Number: 9
  4227.  0x62 0x61 0x75 0x61 0x62 0x63 0x16 0x64 0x18
  4228. End_Chunk
  4229. ;
  4230. ;-------Object  363-------------------------------------------------------
  4231. ; 
  4232. Chunk: Standard
  4233.  Name:     "Worktop[226]"
  4234.  Number:   363
  4235.  Size:     9000 280 300
  4236.  Position: 8100 8820 9050
  4237.  Type:     0
  4238.  Layer:    0
  4239. End_Chunk
  4240. Chunk: Colours
  4241.  Number: 9
  4242.  0x62 0x62 0x60 0x61 0x62 0x63 0x16 0x64 0x18
  4243. End_Chunk
  4244. ;
  4245. ;-------Object  364-------------------------------------------------------
  4246. ; 
  4247. Chunk: Standard
  4248.  Name:     "Fridge"
  4249.  Number:   364
  4250.  Size:     9350 7356 9350
  4251.  Position: 0 0 0
  4252.  Type:     65535
  4253.  Layer:    0
  4254. End_Chunk
  4255. Chunk: SCL
  4256. long   x, y;
  4257.  
  4258.  
  4259. end
  4260. End_Chunk
  4261.  
  4262. Children:
  4263. ;
  4264. ;-------Object   87-------------------------------------------------------
  4265. ; 
  4266. Chunk: Standard
  4267.  Name:     "HobUnit[87]"
  4268.  Number:   87
  4269.  Size:     9350 7356 9350
  4270.  Position: 0 0 0
  4271.  Type:     65535
  4272.  Layer:    0
  4273. End_Chunk
  4274. Chunk: Rotations
  4275.  Initial: 0x0000 0xFFFF8000 0x0000
  4276.  Centre:  4675 4410 4675
  4277. End_Chunk
  4278. Chunk: SCL
  4279. long   x, y;
  4280.  
  4281.  
  4282. end
  4283. End_Chunk
  4284.  
  4285. Children:
  4286. ;
  4287. ;-------Object   91-------------------------------------------------------
  4288. ; 
  4289. Chunk: Standard
  4290.  Name:     "HobUnit[91]"
  4291.  Number:   91
  4292.  Size:     4900 1500 9350
  4293.  Position: 4450 0 0
  4294.  Type:     0
  4295.  Layer:    0
  4296. End_Chunk
  4297. Chunk: Colours
  4298.  Number: 6
  4299.  0xBC 0x00 0x00 0x00 0x00 0x00
  4300. End_Chunk
  4301. ;
  4302. ;-------Object   95-------------------------------------------------------
  4303. ; 
  4304. Chunk: Standard
  4305.  Name:     "HobUnit[95]"
  4306.  Number:   95
  4307.  Size:     5600 6105 3750
  4308.  Position: 3750 1251 5600
  4309.  Type:     108
  4310.  Layer:    0
  4311. End_Chunk
  4312. Chunk: Colours
  4313.  Number: 10
  4314.  0xBA 0xBB 0xBF 0x00 0x00 0xBE 0xBA 0xB8 0xBB 0xBA
  4315. End_Chunk
  4316. ;
  4317. ;-------Object  246-------------------------------------------------------
  4318. ; 
  4319. Chunk: Standard
  4320.  Name:     "HobUnit[246]"
  4321.  Number:   246
  4322.  Size:     4450 1251 4900
  4323.  Position: 0 0 0
  4324.  Type:     0
  4325.  Layer:    0
  4326. End_Chunk
  4327. Chunk: Colours
  4328.  Number: 6
  4329.  0x00 0x00 0x00 0xBD 0x00 0x00
  4330. End_Chunk
  4331. ;
  4332. ;-------Object  247-------------------------------------------------------
  4333. ; 
  4334. Chunk: Standard
  4335.  Name:     "HobUnit[247]"
  4336.  Number:   247
  4337.  Size:     9350 5856 5600
  4338.  Position: 0 1500 0
  4339.  Type:     109
  4340.  Layer:    0
  4341. End_Chunk
  4342. Chunk: Colours
  4343.  Number: 10
  4344.  0x7F 0xBB 0xBF 0xBB 0x00 0x00 0xBB 0xB8 0xBD 0x00
  4345. End_Chunk
  4346. ;
  4347. ;-------Object  767-------------------------------------------------------
  4348. ; 
  4349. Chunk: Standard
  4350.  Name:     "door hold[767]"
  4351.  Number:   767
  4352.  Size:     3750 5856 3750
  4353.  Position: 0 1500 5600
  4354.  Type:     114
  4355.  Layer:    1
  4356. End_Chunk
  4357. Chunk: TexCoords
  4358.  Number: 2
  4359.  Mode:   0
  4360.  SubChunk
  4361.   Facet:     2
  4362.   ImageRef:  1
  4363.   PixScale:  0
  4364.   NumCoords: 4
  4365.     0.00000 0.00000
  4366.     0.00000 1.00000
  4367.     1.00000 1.00000
  4368.     1.00000 0.00000
  4369.  SubChunk
  4370.   Facet:     1
  4371.   ImageRef:  1
  4372.   PixScale:  0
  4373.   NumCoords: 4
  4374.     0.00000 0.00000
  4375.     0.00000 1.00000
  4376.     1.00000 1.00000
  4377.     1.00000 0.00000
  4378. End_Chunk
  4379. Chunk: Colours
  4380.  Number: 130
  4381.  0xBB 0xBC 0xB9 0xBB 0xB9 0xBB 0xBC 0xBD 0xBC 0xBB 0xBD 0xB8 0xBB 0xBC 0xB9 0xB9
  4382.  0xBB 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB9 0xB7 0xBB 0xBA 0xB9 0xBA 0xBB 0xBC 0xBC
  4383.  0xBB 0xBC 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xB8 0xB9 0xB9
  4384.  0xB8 0xB7 0xB6 0xB7 0xB7 0xB6 0xBB 0xBC 0xB8 0xB7 0xBC 0xBD 0xBD 0xBD 0xB6 0xB7
  4385.  0xBE 0xBA 0xB7 0xBB 0xBB 0xB9 0xBB 0xBC 0xBD 0xBC 0xBB 0xBD 0xB8 0xBB 0xBC 0xB9
  4386.  0xB9 0xBB 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xB6 0xB9 0xBB 0xBA 0xB9 0xBA 0xBB
  4387.  0xBC 0xBC 0xBB 0xBC 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xB8
  4388.  0xB9 0xB9 0xB8 0xB7 0xB6 0xB7 0xB7 0xBB 0xBC 0xBD 0xB6 0xB7 0xBE 0xB8 0xB7 0xBC
  4389.  0xBD 0xBD
  4390. End_Chunk
  4391. Chunk: SCL
  4392. short  v00=-1, v01=18, v02=5, v04=4, v03=5;
  4393.  
  4394.  
  4395.  
  4396. /*
  4397.  
  4398.  
  4399.  
  4400.         v00     Determines which side the door is hinged on.
  4401.  
  4402.         v01     stores how many frames the door will open over.
  4403.  
  4404.         v02     stores magnitude and direction of first hinge rotation.
  4405.  
  4406.         v03     stores the initial fisrt hinge status.
  4407.  
  4408.         v04     stores magnitude and direction of second hinge rotation.
  4409.  
  4410.  
  4411.  
  4412. */
  4413.  
  4414. resume (1, 1);
  4415.  
  4416. if (activate (me, 0) || activate (child (me), 0))
  4417.  
  4418. {
  4419.  
  4420. /*
  4421.  
  4422.  
  4423.  
  4424.             visiblise the inside of the cupboard
  4425.  
  4426.  
  4427.  
  4428. */
  4429.  
  4430.  
  4431.  
  4432.  
  4433.  
  4434.   vis (#95);
  4435.  
  4436.   vis (#247);
  4437.  
  4438.   waitfs (3);
  4439.  
  4440. /*
  4441.  
  4442.  
  4443.  
  4444.             open/close cupboard
  4445.  
  4446.  
  4447.  
  4448. */
  4449.  
  4450.  
  4451.  
  4452.   repeat (v01)
  4453.  
  4454.   {
  4455.  
  4456.     ybend (1, me)+=v04*v00;
  4457.  
  4458.     ybend (2, me)+=v02*v00;
  4459.  
  4460.     ybend (1, child (me))+=v04*v00;
  4461.  
  4462.     ybend (2, child (me))+=v02*v00;
  4463.  
  4464.     waitf;
  4465.  
  4466.   }
  4467.  
  4468. /*
  4469.  
  4470.  
  4471.  
  4472.             set up direction change for next time
  4473.  
  4474.  
  4475.  
  4476. */
  4477.  
  4478.   v02=-v02;
  4479.  
  4480.   v04=-v04;
  4481.  
  4482.  
  4483.  
  4484. /*
  4485.  
  4486.  
  4487.  
  4488.             if doors are closed ensure that the inside of the
  4489.  
  4490.             cupboard is invisible
  4491.  
  4492.  
  4493.  
  4494. */
  4495.  
  4496.   if (v02==v03)
  4497.  
  4498.   {
  4499.  
  4500.     invis (#95);
  4501.  
  4502.     invis (#247);
  4503.  
  4504.   }
  4505.  
  4506.   clrtrig (me, 0);
  4507.  
  4508.   clrtrig (child (me), 0);
  4509.  
  4510. }
  4511. end
  4512. End_Chunk
  4513.  
  4514. Chunk: ImageRef
  4515.  Number: 4
  4516.  Index: 1 Image: 1
  4517.  Index: 2 Image: 2
  4518.  Index: 3 Image: 3
  4519.  Index: 4 Image: 4
  4520. End_Chunk
  4521. Chunk: Bending
  4522.  Number: 2
  4523.  Subchunk
  4524.   Angle:  0 0 0
  4525.    First:  9
  4526.   Last:   22
  4527.   Centre: 8
  4528.  Subchunk
  4529.   Angle:  0 0 0
  4530.    First:  17
  4531.   Last:   22
  4532.   Centre: 15
  4533. End_Chunk
  4534.  
  4535. Children:
  4536. ;
  4537. ;-------Object  250-------------------------------------------------------
  4538. ; 
  4539. Chunk: Standard
  4540.  Name:     "door hold[250]"
  4541.  Number:   250
  4542.  Size:     3750 5856 3750
  4543.  Position: 0 0 0
  4544.  Type:     107
  4545.  Layer:    0
  4546. End_Chunk
  4547. Chunk: Bending
  4548.  Number: 2
  4549.  Subchunk
  4550.   Angle:  0 0 0
  4551.    First:  9
  4552.   Last:   164
  4553.   Centre: 8
  4554.  Subchunk
  4555.   Angle:  0 0 0
  4556.    First:  88
  4557.   Last:   164
  4558.   Centre: 87
  4559. End_Chunk
  4560.  
  4561. End_Children
  4562.  
  4563. End_Children
  4564.  
  4565. End_Children
  4566. ;
  4567. ;-------Object  770-------------------------------------------------------
  4568. ; 
  4569. Chunk: Standard
  4570.  Name:     "NFridge[770]"
  4571.  Number:   770
  4572.  Size:     3550 1464 200
  4573.  Position: 5800 7356 3550
  4574.  Type:     113
  4575.  Layer:    1
  4576. End_Chunk
  4577. Chunk: TexCoords
  4578.  Number: 1
  4579.  Mode:   0
  4580.  SubChunk
  4581.   Facet:     1
  4582.   ImageRef:  1
  4583.   PixScale:  0
  4584.   NumCoords: 4
  4585.     0.00000 0.00000
  4586.     0.00000 1.00000
  4587.     1.00000 1.00000
  4588.     1.00000 0.00000
  4589. End_Chunk
  4590. Chunk: Colours
  4591.  Number: 6
  4592.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  4593. End_Chunk
  4594.  
  4595. Chunk: ImageRef
  4596.  Number: 4
  4597.  Index: 1 Image: 1
  4598.  Index: 2 Image: 2
  4599.  Index: 3 Image: 3
  4600.  Index: 4 Image: 4
  4601. End_Chunk
  4602.  
  4603. Children:
  4604. ;
  4605. ;-------Object  372-------------------------------------------------------
  4606. ; 
  4607. Chunk: Standard
  4608.  Name:     "NFridge[215]"
  4609.  Number:   372
  4610.  Size:     3550 1464 200
  4611.  Position: 0 0 0
  4612.  Type:     14
  4613.  Layer:    0
  4614. End_Chunk
  4615. Chunk: Colours
  4616.  Number: 38
  4617.  0xBA 0xBE 0xBC 0xBD 0xBE 0xBD 0xBC 0xBE 0xB7 0xB6 0xB7 0xB8 0xB9 0xBB 0xB9 0xBB
  4618.  0xB8 0xB8 0xBB 0xBD 0xB6 0xBA 0xBB 0xBC 0xB9 0xBD 0xB9 0xBD 0xBD 0xBC 0xB8 0xB7
  4619.  0xB6 0xB7 0xB7 0xBB 0xBB 0xBB
  4620. End_Chunk
  4621.  
  4622. End_Children
  4623. ;
  4624. ;-------Object  771-------------------------------------------------------
  4625. ; 
  4626. Chunk: Standard
  4627.  Name:     "NFridge[771]"
  4628.  Number:   771
  4629.  Size:     200 1464 3550
  4630.  Position: 5600 7356 0
  4631.  Type:     113
  4632.  Layer:    1
  4633. End_Chunk
  4634. Chunk: TexCoords
  4635.  Number: 1
  4636.  Mode:   0
  4637.  SubChunk
  4638.   Facet:     2
  4639.   ImageRef:  1
  4640.   PixScale:  0
  4641.   NumCoords: 4
  4642.     0.00000 0.00000
  4643.     0.00000 1.00000
  4644.     1.00000 1.00000
  4645.     1.00000 0.00000
  4646. End_Chunk
  4647. Chunk: Colours
  4648.  Number: 6
  4649.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  4650. End_Chunk
  4651.  
  4652. Chunk: ImageRef
  4653.  Number: 4
  4654.  Index: 1 Image: 1
  4655.  Index: 2 Image: 2
  4656.  Index: 3 Image: 3
  4657.  Index: 4 Image: 4
  4658. End_Chunk
  4659.  
  4660. Children:
  4661. ;
  4662. ;-------Object  373-------------------------------------------------------
  4663. ; 
  4664. Chunk: Standard
  4665.  Name:     "NFridge[211]"
  4666.  Number:   373
  4667.  Size:     200 1464 3550
  4668.  Position: 0 0 0
  4669.  Type:     21
  4670.  Layer:    0
  4671. End_Chunk
  4672. Chunk: Colours
  4673.  Number: 38
  4674.  0xBA 0xBE 0xBC 0xBD 0xBE 0xBD 0xBC 0xBE 0xB7 0xB6 0xB7 0xB8 0xB9 0xBB 0xB9 0xBB
  4675.  0xB8 0xB8 0xBB 0xBD 0xB6 0xBA 0xBB 0xBC 0xB9 0xBD 0xB9 0xBD 0xBD 0xBC 0xB8 0xB7
  4676.  0xB6 0xB7 0xB7 0xBB 0xBB 0xBB
  4677. End_Chunk
  4678.  
  4679. End_Children
  4680. ;
  4681. ;-------Object  374-------------------------------------------------------
  4682. ; 
  4683. Chunk: Standard
  4684.  Name:     "TapGroup"
  4685.  Number:   374
  4686.  Size:     5174 2500 3000
  4687.  Position: 10000 9286 5984
  4688.  Type:     65535
  4689.  Layer:    0
  4690. End_Chunk
  4691.  
  4692. Children:
  4693. ;
  4694. ;-------Object  366-------------------------------------------------------
  4695. ; 
  4696. Chunk: Standard
  4697.  Name:     "flow[366]"
  4698.  Number:   366
  4699.  Size:     200 2050 200
  4700.  Position: 4811 0 1658
  4701.  Type:     112
  4702.  Layer:    0
  4703.  OFlags:   AaIi
  4704. End_Chunk
  4705. Chunk: Animations
  4706.  Number: 1
  4707.  Subchunk
  4708.   First:    1
  4709.   Last:     7
  4710.   Phase:    0x0100
  4711.   Velocity: 0x0100
  4712.   Mode:     0
  4713. End_Chunk
  4714. Chunk: SCL
  4715. if (ccel (me, 1)==1)
  4716.  
  4717.   setcol (0, 12, #366);
  4718.  
  4719. else
  4720.  
  4721.   setcol (0xF0, 12, #366);
  4722.  
  4723. if (activate (me, 0) & ccel (me, 1)==20)
  4724.  
  4725.   animode (me, 1)=7;
  4726.  
  4727.  
  4728. end
  4729. End_Chunk
  4730. Chunk: Colours
  4731.  Number: 118
  4732.  0xF0 0xF0 0xF0 0xF0 0xF0 0x18 0x16 0x10 0x10 0x10 0x12 0x00 0x00 0x12 0x12 0x10
  4733.  0x12 0x12 0x12 0x1B 0x12 0x13 0x13 0x13 0x14 0x15 0x14 0x14 0x13 0x12 0x12 0x12
  4734.  0x1C 0x1C 0x1A 0x18 0x16 0x16 0x18 0x14 0x12 0x12 0x14 0x15 0x18 0x12 0x1C 0x1D
  4735.  0x12 0x12 0x12 0x13 0x14 0x14 0x14 0x14 0x13 0x13 0x13 0x13 0x1C 0x12 0x12 0x12
  4736.  0x1D 0x1B 0x18 0x18 0x15 0x13 0x12 0x11 0x13 0x17 0x17 0x17 0x17 0x19 0x1C 0x1C
  4737.  0x1B 0x1B 0x19 0x17 0x16 0x15 0x12 0x10 0x10 0x10 0x12 0x14 0x15 0x15 0x16 0x18
  4738.  0x14 0x10 0x01 0x13 0x62 0x62 0x62 0x62 0x62 0x13 0x13 0x13 0x17 0x13 0x12 0x12
  4739.  0x13 0x13 0x1C 0x1C 0x13 0x62
  4740. End_Chunk
  4741. ;
  4742. ;-------Object  375-------------------------------------------------------
  4743. ; 
  4744. Chunk: Standard
  4745.  Name:     "Tappy"
  4746.  Number:   375
  4747.  Size:     2783 1680 280
  4748.  Position: 2391 800 2500
  4749.  Type:     96
  4750.  Layer:    0
  4751. End_Chunk
  4752. Chunk: SCL
  4753. short  v01=14, v02=5;
  4754.  
  4755.  
  4756.  
  4757. /*
  4758.  
  4759.             v01     holds the number of frames over which the action will
  4760.  
  4761.                     take place.
  4762.  
  4763.             v02     determines the speed and direction of rotation.
  4764.  
  4765.  
  4766.  
  4767.  
  4768.  
  4769. */
  4770.  
  4771. resume (1, 1);
  4772.  
  4773. /*
  4774.  
  4775.  
  4776.  
  4777.             action this only when tap is not in operation.
  4778.  
  4779.  
  4780.  
  4781. */
  4782.  
  4783. if (activate (me, 0) && !vis? (#366))
  4784.  
  4785. {
  4786.  
  4787. /*
  4788.  
  4789.  
  4790.  
  4791.             turn tap
  4792.  
  4793.  
  4794.  
  4795. */
  4796.  
  4797.   repeat (v01)
  4798.  
  4799.   {
  4800.  
  4801.     yrot (me)+=v02;
  4802.  
  4803.     waitf;
  4804.  
  4805.   }
  4806.  
  4807.   v02=-v02;
  4808.  
  4809.   clrtrig (me, 0);
  4810.  
  4811. }
  4812. end
  4813. End_Chunk
  4814. Chunk: Colours
  4815.  Number: 37
  4816.  0x68 0x68 0x68 0x68 0x68 0x68 0x68 0x68 0x18 0x17 0x16 0x15 0x14 0x14 0x18 0x1B
  4817.  0x12 0x12 0x12 0x13 0x14 0x15 0x16 0x15 0x14 0x13 0x12 0x11 0x11 0x11 0x13 0x10
  4818.  0x10 0x11 0x12 0x13 0x14
  4819. End_Chunk
  4820. Chunk: Angular Velocities
  4821.  Initial: 0x0000 0x0000 0x0000
  4822. End_Chunk
  4823. Chunk: Rotations
  4824.  Initial: 0x0000 0x0E38 0x0000
  4825.  Centre:  140 0 140
  4826. End_Chunk
  4827. ;
  4828. ;-------Object  376-------------------------------------------------------
  4829. ; 
  4830. Chunk: Standard
  4831.  Name:     "Tapbit"
  4832.  Number:   376
  4833.  Size:     600 800 600
  4834.  Position: 2200 0 2350
  4835.  Type:     97
  4836.  Layer:    0
  4837. End_Chunk
  4838. Chunk: Colours
  4839.  Number: 9
  4840.  0x13 0x11 0x16 0x13 0x14 0x15 0x16 0x17 0x18
  4841. End_Chunk
  4842. ;
  4843. ;-------Object  377-------------------------------------------------------
  4844. ; 
  4845. Chunk: Standard
  4846.  Name:     "Tapbit[229]"
  4847.  Number:   377
  4848.  Size:     500 400 400
  4849.  Position: 1700 150 2450
  4850.  Type:     98
  4851.  Layer:    0
  4852. End_Chunk
  4853. Chunk: Rotations
  4854.  Initial: 0x0000 0x0000 0x0000
  4855.  Centre:  250 200 200
  4856. End_Chunk
  4857. Chunk: SCL
  4858. /* examine other tap for comments */
  4859.  
  4860. resume (1, 3);
  4861.  
  4862. if (activate (me, 0))
  4863.  
  4864. {
  4865.  
  4866.   if (yrot (#375)<20 & ccel (#348, 1)==1)
  4867.  
  4868.   {
  4869.  
  4870.     vis (#365);
  4871.  
  4872.     vis (#366);
  4873.  
  4874.     vis (#367);
  4875.  
  4876.     animode (#365, 1)=7;
  4877.  
  4878.     animode (#366, 1)=7;
  4879.  
  4880.     animode (#348, 1)=7;
  4881.  
  4882.     animode (#355, 1)=7;
  4883.  
  4884.     animode (#367, 1)=7;
  4885.  
  4886.     repeat (7)
  4887.  
  4888.     {
  4889.  
  4890.       xrot (me)+=4;
  4891.  
  4892.       waitf;
  4893.  
  4894.     }
  4895.  
  4896.     waitfs (7);
  4897.  
  4898.     animode (#365, 1)=7;
  4899.  
  4900.     animode (#366, 1)=7;
  4901.  
  4902.     animode (#367, 1)=7;
  4903.  
  4904.     repeat (7)
  4905.  
  4906.     {
  4907.  
  4908.       xrot (me)-=4;
  4909.  
  4910.       waitf;
  4911.  
  4912.     }
  4913.  
  4914.     invis (#365);
  4915.  
  4916.     invis (#366);
  4917.  
  4918.     invis (#367);
  4919.  
  4920.   }
  4921.  
  4922. }
  4923. end
  4924. End_Chunk
  4925. Chunk: Colours
  4926.  Number: 6
  4927.  0x16 0x12 0x15 0x13 0x14 0xA6
  4928. End_Chunk
  4929. ;
  4930. ;-------Object  378-------------------------------------------------------
  4931. ; 
  4932. Chunk: Standard
  4933.  Name:     "Tapbit[230]"
  4934.  Number:   378
  4935.  Size:     500 400 400
  4936.  Position: 2800 150 2450
  4937.  Type:     99
  4938.  Layer:    0
  4939. End_Chunk
  4940. Chunk: Rotations
  4941.  Initial: 0x0000 0x0000 0x0000
  4942.  Centre:  250 200 200
  4943. End_Chunk
  4944. Chunk: SCL
  4945. resume (1, 3);
  4946.  
  4947. if (activate (me, 0))
  4948.  
  4949. {
  4950.  
  4951. /*
  4952.  
  4953.  
  4954.  
  4955.         Turn water on only if tap is in it`s correct position
  4956.  
  4957.         and if the sink is empty (CELL 1)
  4958.  
  4959.  
  4960.  
  4961. */
  4962.  
  4963.  
  4964.  
  4965.  
  4966.  
  4967.   if (yrot (#375)<20 & ccel (#348, 1)==1)
  4968.  
  4969.   {
  4970.  
  4971.  
  4972.  
  4973. /*
  4974.  
  4975.  
  4976.  
  4977.             make flow visible
  4978.  
  4979.             animate flow objects
  4980.  
  4981.             animate sink
  4982.  
  4983.  
  4984.  
  4985. */
  4986.  
  4987.  
  4988.  
  4989.     vis (#365);
  4990.  
  4991.     vis (#366);
  4992.  
  4993.     vis (#367);
  4994.  
  4995.     animode (#365, 1)=7;
  4996.  
  4997.     animode (#366, 1)=7;
  4998.  
  4999.     animode (#348, 1)=7;
  5000.  
  5001.     animode (#355, 1)=7;
  5002.  
  5003.     animode (#367, 1)=7;
  5004.  
  5005. /*
  5006.  
  5007.  
  5008.  
  5009.             rotate tap
  5010.  
  5011.  
  5012.  
  5013. */
  5014.  
  5015.     repeat (7)
  5016.  
  5017.     {
  5018.  
  5019.       xrot (me)+=4;
  5020.  
  5021.       waitf;
  5022.  
  5023.     }
  5024.  
  5025.     waitfs (7);
  5026.  
  5027. /*
  5028.  
  5029.  
  5030.  
  5031.             re-animate flow objects
  5032.  
  5033.             so that flow rate appears to fall
  5034.  
  5035.  
  5036.  
  5037. */
  5038.  
  5039.     animode (#365, 1)=7;
  5040.  
  5041.     animode (#366, 1)=7;
  5042.  
  5043.     animode (#367, 1)=7;
  5044.  
  5045. /*
  5046.  
  5047.  
  5048.  
  5049.             return tap to original orientation
  5050.  
  5051.  
  5052.  
  5053. */
  5054.  
  5055.     repeat (7)
  5056.  
  5057.     {
  5058.  
  5059.       xrot (me)-=4;
  5060.  
  5061.       waitf;
  5062.  
  5063.     }
  5064.  
  5065. /*
  5066.  
  5067.  
  5068.  
  5069.             invisiblise flow objects
  5070.  
  5071.  
  5072.  
  5073. */
  5074.  
  5075.  
  5076.  
  5077.     invis (#365);
  5078.  
  5079.     invis (#366);
  5080.  
  5081.     invis (#367);
  5082.  
  5083.   }
  5084.  
  5085. }
  5086. end
  5087. End_Chunk
  5088. Chunk: Colours
  5089.  Number: 6
  5090.  0x14 0x12 0x15 0x13 0x16 0xDF
  5091. End_Chunk
  5092.  
  5093. End_Children
  5094. ;
  5095. ;-------Object  368-------------------------------------------------------
  5096. ; 
  5097. Chunk: Standard
  5098.  Name:     "Worktop[368]"
  5099.  Number:   368
  5100.  Size:     6000 280 3350
  5101.  Position: 0 8820 0
  5102.  Type:     19
  5103.  Layer:    0
  5104. End_Chunk
  5105. Chunk: Colours
  5106.  Number: 9
  5107.  0x62 0x61 0x60 0x61 0x62 0x63 0x16 0x64 0x67
  5108. End_Chunk
  5109.  
  5110. End_Children
  5111.  
  5112. End_Children
  5113. ;
  5114. ;-------Object   67-------------------------------------------------------
  5115. ; 
  5116. Chunk: Standard
  5117.  Name:     "W/Machn Units-Group"
  5118.  Number:   67
  5119.  Size:     18600 9100 6000
  5120.  Position: 29450 0 28550
  5121.  Type:     65535
  5122.  Layer:    0
  5123. End_Chunk
  5124.  
  5125. Children:
  5126. ;
  5127. ;-------Object   46-------------------------------------------------------
  5128. ; 
  5129. Chunk: Standard
  5130.  Name:     "W/Mchne-Taps-Hide"
  5131.  Number:   46
  5132.  Size:     1600 8820 5600
  5133.  Position: 0 0 400
  5134.  Type:     18
  5135.  Layer:    0
  5136. End_Chunk
  5137. Chunk: Colours
  5138.  Number: 7
  5139.  0x00 0x00 0xBA 0xBD 0x00 0x00 0xBF
  5140. End_Chunk
  5141. ;
  5142. ;-------Object   47-------------------------------------------------------
  5143. ; 
  5144. Chunk: Standard
  5145.  Name:     "WashingMachine"
  5146.  Number:   47
  5147.  Size:     12000 8820 6000
  5148.  Position: 1600 0 0
  5149.  Type:     65535
  5150.  Layer:    0
  5151. End_Chunk
  5152.  
  5153. Children:
  5154. ;
  5155. ;-------Object   78-------------------------------------------------------
  5156. ; 
  5157. Chunk: Standard
  5158.  Name:     "WashingMachine[78]"
  5159.  Number:   78
  5160.  Size:     12000 8820 5600
  5161.  Position: 0 0 400
  5162.  Type:     18
  5163.  Layer:    0
  5164. End_Chunk
  5165. Chunk: Colours
  5166.  Number: 7
  5167.  0x00 0x00 0x00 0xBD 0x00 0x00 0xB6
  5168. End_Chunk
  5169. ;
  5170. ;-------Object  120-------------------------------------------------------
  5171. ; 
  5172. Chunk: Standard
  5173.  Name:     "door hold[120]"
  5174.  Number:   120
  5175.  Size:     6000 7320 200
  5176.  Position: 0 1500 200
  5177.  Type:     65535
  5178.  Layer:    0
  5179. End_Chunk
  5180.  
  5181. Children:
  5182. ;
  5183. ;-------Object  403-------------------------------------------------------
  5184. ; 
  5185. Chunk: Standard
  5186.  Name:     "door hold[403]"
  5187.  Number:   403
  5188.  Size:     6000 1464 150
  5189.  Position: 0 5856 0
  5190.  Type:     45
  5191.  Layer:    0
  5192. End_Chunk
  5193. ;
  5194. ;-------Object   72-------------------------------------------------------
  5195. ; 
  5196. Chunk: Standard
  5197.  Name:     "door hold[72]"
  5198.  Number:   72
  5199.  Size:     6000 5856 150
  5200.  Position: 0 0 0
  5201.  Type:     106
  5202.  Layer:    0
  5203. End_Chunk
  5204.  
  5205. End_Children
  5206. ;
  5207. ;-------Object   71-------------------------------------------------------
  5208. ; 
  5209. Chunk: Standard
  5210.  Name:     "door hold[71]"
  5211.  Number:   71
  5212.  Size:     6000 7320 200
  5213.  Position: 6000 1500 200
  5214.  Type:     65535
  5215.  Layer:    0
  5216. End_Chunk
  5217.  
  5218. Children:
  5219. ;
  5220. ;-------Object  122-------------------------------------------------------
  5221. ; 
  5222. Chunk: Standard
  5223.  Name:     "door hold[122]"
  5224.  Number:   122
  5225.  Size:     6000 1464 150
  5226.  Position: 0 5856 0
  5227.  Type:     45
  5228.  Layer:    0
  5229. End_Chunk
  5230. ;
  5231. ;-------Object   73-------------------------------------------------------
  5232. ; 
  5233. Chunk: Standard
  5234.  Name:     "door hold[73]"
  5235.  Number:   73
  5236.  Size:     6000 5856 150
  5237.  Position: 0 0 0
  5238.  Type:     106
  5239.  Layer:    0
  5240. End_Chunk
  5241.  
  5242. End_Children
  5243.  
  5244. End_Children
  5245. ;
  5246. ;-------Object   49-------------------------------------------------------
  5247. ; 
  5248. Chunk: Standard
  5249.  Name:     "FourDrawerUnit"
  5250.  Number:   49
  5251.  Size:     5000 8820 6000
  5252.  Position: 13600 0 0
  5253.  Type:     65535
  5254.  Layer:    0
  5255. End_Chunk
  5256.  
  5257. Children:
  5258. ;
  5259. ;-------Object   80-------------------------------------------------------
  5260. ; 
  5261. Chunk: Standard
  5262.  Name:     "FourDrawerUnit[80]"
  5263.  Number:   80
  5264.  Size:     5000 8820 5600
  5265.  Position: 0 0 400
  5266.  Type:     18
  5267.  Layer:    0
  5268. End_Chunk
  5269. Chunk: Colours
  5270.  Number: 7
  5271.  0x00 0x00 0x00 0xBD 0x00 0x00 0xBF
  5272. End_Chunk
  5273. ;
  5274. ;-------Object  773-------------------------------------------------------
  5275. ; 
  5276. Chunk: Standard
  5277.  Name:     "TopDrawer[773]"
  5278.  Number:   773
  5279.  Size:     5000 1464 200
  5280.  Position: 0 7356 200
  5281.  Type:     113
  5282.  Layer:    1
  5283.  DFlags:   Nc
  5284. End_Chunk
  5285. Chunk: TexCoords
  5286.  Number: 1
  5287.  Mode:   0
  5288.  SubChunk
  5289.   Facet:     1
  5290.   ImageRef:  1
  5291.   PixScale:  0
  5292.   NumCoords: 4
  5293.     0.00000 0.00000
  5294.     0.00000 1.00000
  5295.     1.00000 1.00000
  5296.     1.00000 0.00000
  5297. End_Chunk
  5298. Chunk: Colours
  5299.  Number: 6
  5300.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  5301. End_Chunk
  5302.  
  5303. Chunk: ImageRef
  5304.  Number: 4
  5305.  Index: 1 Image: 1
  5306.  Index: 2 Image: 2
  5307.  Index: 3 Image: 3
  5308.  Index: 4 Image: 4
  5309. End_Chunk
  5310.  
  5311. Children:
  5312. ;
  5313. ;-------Object   81-------------------------------------------------------
  5314. ; 
  5315. Chunk: Standard
  5316.  Name:     "TopDrawer"
  5317.  Number:   81
  5318.  Size:     5000 1464 200
  5319.  Position: 0 0 0
  5320.  Type:     14
  5321.  Layer:    0
  5322. End_Chunk
  5323.  
  5324. End_Children
  5325. ;
  5326. ;-------Object  774-------------------------------------------------------
  5327. ; 
  5328. Chunk: Standard
  5329.  Name:     "FirstDrawer[774]"
  5330.  Number:   774
  5331.  Size:     5000 1952 200
  5332.  Position: 0 5404 200
  5333.  Type:     113
  5334.  Layer:    1
  5335.  DFlags:   Nc
  5336. End_Chunk
  5337. Chunk: TexCoords
  5338.  Number: 1
  5339.  Mode:   0
  5340.  SubChunk
  5341.   Facet:     1
  5342.   ImageRef:  1
  5343.   PixScale:  0
  5344.   NumCoords: 4
  5345.     0.00000 0.00000
  5346.     0.00000 1.00000
  5347.     1.00000 1.00000
  5348.     1.00000 0.00000
  5349. End_Chunk
  5350. Chunk: Colours
  5351.  Number: 6
  5352.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  5353. End_Chunk
  5354.  
  5355. Chunk: ImageRef
  5356.  Number: 4
  5357.  Index: 1 Image: 1
  5358.  Index: 2 Image: 2
  5359.  Index: 3 Image: 3
  5360.  Index: 4 Image: 4
  5361. End_Chunk
  5362.  
  5363. Children:
  5364. ;
  5365. ;-------Object   82-------------------------------------------------------
  5366. ; 
  5367. Chunk: Standard
  5368.  Name:     "FirstDrawer[82]"
  5369.  Number:   82
  5370.  Size:     5000 1952 200
  5371.  Position: 0 0 0
  5372.  Type:     14
  5373.  Layer:    0
  5374. End_Chunk
  5375.  
  5376. End_Children
  5377. ;
  5378. ;-------Object  775-------------------------------------------------------
  5379. ; 
  5380. Chunk: Standard
  5381.  Name:     "SecondDrawer[775]"
  5382.  Number:   775
  5383.  Size:     5000 1952 200
  5384.  Position: 0 3452 200
  5385.  Type:     113
  5386.  Layer:    1
  5387.  DFlags:   Nc
  5388. End_Chunk
  5389. Chunk: TexCoords
  5390.  Number: 1
  5391.  Mode:   0
  5392.  SubChunk
  5393.   Facet:     1
  5394.   ImageRef:  1
  5395.   PixScale:  0
  5396.   NumCoords: 4
  5397.     0.00000 0.00000
  5398.     0.00000 1.00000
  5399.     1.00000 1.00000
  5400.     1.00000 0.00000
  5401. End_Chunk
  5402. Chunk: Colours
  5403.  Number: 6
  5404.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  5405. End_Chunk
  5406.  
  5407. Chunk: ImageRef
  5408.  Number: 4
  5409.  Index: 1 Image: 1
  5410.  Index: 2 Image: 2
  5411.  Index: 3 Image: 3
  5412.  Index: 4 Image: 4
  5413. End_Chunk
  5414.  
  5415. Children:
  5416. ;
  5417. ;-------Object   83-------------------------------------------------------
  5418. ; 
  5419. Chunk: Standard
  5420.  Name:     "SecondDrawer[83]"
  5421.  Number:   83
  5422.  Size:     5000 1952 200
  5423.  Position: 0 0 0
  5424.  Type:     14
  5425.  Layer:    0
  5426. End_Chunk
  5427.  
  5428. End_Children
  5429. ;
  5430. ;-------Object  776-------------------------------------------------------
  5431. ; 
  5432. Chunk: Standard
  5433.  Name:     "BottomDrawer[776]"
  5434.  Number:   776
  5435.  Size:     5000 1952 200
  5436.  Position: 0 1500 200
  5437.  Type:     113
  5438.  Layer:    1
  5439.  DFlags:   Nc
  5440. End_Chunk
  5441. Chunk: TexCoords
  5442.  Number: 1
  5443.  Mode:   0
  5444.  SubChunk
  5445.   Facet:     1
  5446.   ImageRef:  1
  5447.   PixScale:  0
  5448.   NumCoords: 4
  5449.     0.00000 0.00000
  5450.     0.00000 1.00000
  5451.     1.00000 1.00000
  5452.     1.00000 0.00000
  5453. End_Chunk
  5454. Chunk: Colours
  5455.  Number: 6
  5456.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  5457. End_Chunk
  5458.  
  5459. Chunk: ImageRef
  5460.  Number: 4
  5461.  Index: 1 Image: 1
  5462.  Index: 2 Image: 2
  5463.  Index: 3 Image: 3
  5464.  Index: 4 Image: 4
  5465. End_Chunk
  5466.  
  5467. Children:
  5468. ;
  5469. ;-------Object   84-------------------------------------------------------
  5470. ; 
  5471. Chunk: Standard
  5472.  Name:     "BottomDrawer[84]"
  5473.  Number:   84
  5474.  Size:     5000 1952 200
  5475.  Position: 0 0 0
  5476.  Type:     14
  5477.  Layer:    0
  5478. End_Chunk
  5479.  
  5480. End_Children
  5481.  
  5482. End_Children
  5483. ;
  5484. ;-------Object   68-------------------------------------------------------
  5485. ; 
  5486. Chunk: Standard
  5487.  Name:     "W/Machn Units-Group[68]"
  5488.  Number:   68
  5489.  Size:     18600 280 6000
  5490.  Position: 0 8820 0
  5491.  Type:     17
  5492.  Layer:    0
  5493. End_Chunk
  5494.  
  5495. End_Children
  5496. ;
  5497. ;-------Object  402-------------------------------------------------------
  5498. ; 
  5499. Chunk: Standard
  5500.  Name:     "South-Area"
  5501.  Number:   402
  5502.  Size:     31050 26000 13950
  5503.  Position: 25950 0 2000
  5504.  Type:     65535
  5505.  Layer:    0
  5506. End_Chunk
  5507.  
  5508. Children:
  5509. ;
  5510. ;-------Object   50-------------------------------------------------------
  5511. ; 
  5512. Chunk: Standard
  5513.  Name:     "Oven"
  5514.  Number:   50
  5515.  Size:     6000 20920 6000
  5516.  Position: 700 0 0
  5517.  Type:     65535
  5518.  Layer:    0
  5519. End_Chunk
  5520. Chunk: SCL
  5521. short  v00;
  5522.  
  5523.  
  5524. end
  5525. End_Chunk
  5526.  
  5527. Children:
  5528. ;
  5529. ;-------Object   85-------------------------------------------------------
  5530. ; 
  5531. Chunk: Standard
  5532.  Name:     "Oven[85]"
  5533.  Number:   85
  5534.  Size:     6000 1500 4900
  5535.  Position: 0 0 0
  5536.  Type:     0
  5537.  Layer:    0
  5538. End_Chunk
  5539. Chunk: Colours
  5540.  Number: 6
  5541.  0xBC 0x00 0x00 0xBD 0x00 0x00
  5542. End_Chunk
  5543. ;
  5544. ;-------Object  169-------------------------------------------------------
  5545. ; 
  5546. Chunk: Standard
  5547.  Name:     "Oven[169]"
  5548.  Number:   169
  5549.  Size:     6000 5856 5600
  5550.  Position: 0 1500 0
  5551.  Type:     58
  5552.  Layer:    0
  5553. End_Chunk
  5554. Chunk: Colours
  5555.  Number: 10
  5556.  0x7F 0xBB 0xBF 0xBB 0xBC 0x00 0xBA 0xB7 0xBD 0x00
  5557. End_Chunk
  5558. ;
  5559. ;-------Object   48-------------------------------------------------------
  5560. ; 
  5561. Chunk: Standard
  5562.  Name:     "door hold[48]"
  5563.  Number:   48
  5564.  Size:     6000 5856 200
  5565.  Position: 0 1500 5600
  5566.  Type:     113
  5567.  Layer:    1
  5568. End_Chunk
  5569. Chunk: TexCoords
  5570.  Number: 1
  5571.  Mode:   0
  5572.  SubChunk
  5573.   Facet:     3
  5574.   ImageRef:  1
  5575.   PixScale:  0
  5576.   NumCoords: 4
  5577.     0.00000 0.00000
  5578.     0.00000 1.00000
  5579.     1.00000 1.00000
  5580.     1.00000 0.00000
  5581. End_Chunk
  5582. Chunk: Colours
  5583.  Number: 6
  5584.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  5585. End_Chunk
  5586.  
  5587. Chunk: ImageRef
  5588.  Number: 5
  5589.  Index: 1 Image: 1
  5590.  Index: 2 Image: 2
  5591.  Index: 3 Image: 3
  5592.  Index: 4 Image: 4
  5593.  Index: 5 Image: 26
  5594. End_Chunk
  5595. Chunk: SCL
  5596. short  v00=-1, v01=20, v02=5, v03=5;
  5597.  
  5598.  
  5599.  
  5600. resume (1, 1);
  5601.  
  5602. if (activate (me, 0) || activate (child (me), 0) || activate 
  5603.  
  5604.     (sibling (child (me)), 0) || activate (sibling (sibling 
  5605.  
  5606.     (child (me))), 0))
  5607.  
  5608. {
  5609.  
  5610.   gvar (0, parent (me))=1;
  5611.  
  5612.   waitfs (3);
  5613.  
  5614.   repeat (v01)
  5615.  
  5616.   {
  5617.  
  5618.     yrot (me)+=v02*v00;
  5619.  
  5620.     waitf;
  5621.  
  5622.   }
  5623.  
  5624.   v02=-v02;
  5625.  
  5626.   if (v02==v03)
  5627.  
  5628.     gvar (0, parent (me))=0;
  5629.  
  5630.   clrtrig (me, 0);
  5631.  
  5632.   clrtrig (child (me), 0);
  5633.  
  5634.   clrtrig (sibling (child (me)), 0);
  5635.  
  5636.   clrtrig (sibling (sibling (child (me))), 0);
  5637.  
  5638. }
  5639. end
  5640. End_Chunk
  5641. Chunk: Rotations
  5642.  Initial: 0x0000 0x0000 0x0000
  5643.  Centre:  291 2928 0
  5644. End_Chunk
  5645.  
  5646. Children:
  5647. ;
  5648. ;-------Object   75-------------------------------------------------------
  5649. ; 
  5650. Chunk: Standard
  5651.  Name:     "door1st[75]"
  5652.  Number:   75
  5653.  Size:     6000 5856 200
  5654.  Position: 0 0 0
  5655.  Type:     59
  5656.  Layer:    0
  5657.  OFlags:   r
  5658. End_Chunk
  5659. Chunk: Distancing
  5660.  Visible:   6000
  5661.  Invisible: 6375
  5662.  Replace:   79
  5663. End_Chunk
  5664. ;
  5665. ;-------Object   79-------------------------------------------------------
  5666. ; 
  5667. Chunk: Standard
  5668.  Name:     "door2nd[79]"
  5669.  Number:   79
  5670.  Size:     6000 5856 200
  5671.  Position: 0 0 0
  5672.  Type:     23
  5673.  Layer:    0
  5674.  OFlags:   r
  5675. End_Chunk
  5676. Chunk: Distancing
  5677.  Visible:   8000
  5678.  Invisible: 8500
  5679.  Replace:   207
  5680. End_Chunk
  5681. ;
  5682. ;-------Object  207-------------------------------------------------------
  5683. ; 
  5684. Chunk: Standard
  5685.  Name:     "door3rd[207]"
  5686.  Number:   207
  5687.  Size:     6000 5856 200
  5688.  Position: 0 0 0
  5689.  Type:     70
  5690.  Layer:    0
  5691.  DFlags:   R
  5692.  OFlags:   i
  5693. End_Chunk
  5694.  
  5695. End_Children
  5696. ;
  5697. ;-------Object  248-------------------------------------------------------
  5698. ; 
  5699. Chunk: Standard
  5700.  Name:     "door hold[248]"
  5701.  Number:   248
  5702.  Size:     6000 4364 200
  5703.  Position: 0 16556 5600
  5704.  Type:     113
  5705.  Layer:    1
  5706. End_Chunk
  5707. Chunk: TexCoords
  5708.  Number: 1
  5709.  Mode:   0
  5710.  SubChunk
  5711.   Facet:     3
  5712.   ImageRef:  1
  5713.   PixScale:  0
  5714.   NumCoords: 4
  5715.     0.00000 0.00000
  5716.     0.00000 1.00000
  5717.     1.00000 1.00000
  5718.     1.00000 0.00000
  5719. End_Chunk
  5720. Chunk: Colours
  5721.  Number: 6
  5722.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  5723. End_Chunk
  5724.  
  5725. Chunk: ImageRef
  5726.  Number: 4
  5727.  Index: 1 Image: 1
  5728.  Index: 2 Image: 2
  5729.  Index: 3 Image: 3
  5730.  Index: 4 Image: 4
  5731. End_Chunk
  5732. Chunk: SCL
  5733. short  v00=-1, v01=20, v02=5, v03=5;
  5734.  
  5735.  
  5736.  
  5737. resume (1, 1);
  5738.  
  5739. if (activate (me, 0) || activate (child (me), 0) || activate 
  5740.  
  5741.     (sibling (child (me)), 0) || activate (sibling (sibling 
  5742.  
  5743.     (child (me))), 0))
  5744.  
  5745. {
  5746.  
  5747.   gvar (0, parent (me))=1;
  5748.  
  5749.   waitfs (3);
  5750.  
  5751.   repeat (v01)
  5752.  
  5753.   {
  5754.  
  5755.     yrot (me)+=v02*v00;
  5756.  
  5757.     waitf;
  5758.  
  5759.   }
  5760.  
  5761.   v02=-v02;
  5762.  
  5763.   if (v02==v03)
  5764.  
  5765.     gvar (0, parent (me))=0;
  5766.  
  5767.   clrtrig (me, 0);
  5768.  
  5769.   clrtrig (child (me), 0);
  5770.  
  5771.   clrtrig (sibling (child (me)), 0);
  5772.  
  5773.   clrtrig (sibling (sibling (child (me))), 0);
  5774.  
  5775. }
  5776. end
  5777. End_Chunk
  5778. Chunk: Rotations
  5779.  Initial: 0x0000 0x0000 0x0000
  5780.  Centre:  0 4364 200
  5781. End_Chunk
  5782.  
  5783. Children:
  5784. ;
  5785. ;-------Object  249-------------------------------------------------------
  5786. ; 
  5787. Chunk: Standard
  5788.  Name:     "door1st[249]"
  5789.  Number:   249
  5790.  Size:     6000 4364 200
  5791.  Position: 0 0 0
  5792.  Type:     59
  5793.  Layer:    0
  5794.  OFlags:   r
  5795. End_Chunk
  5796. Chunk: Distancing
  5797.  Visible:   6000
  5798.  Invisible: 6375
  5799.  Replace:   253
  5800. End_Chunk
  5801. ;
  5802. ;-------Object  253-------------------------------------------------------
  5803. ; 
  5804. Chunk: Standard
  5805.  Name:     "door2nd[253]"
  5806.  Number:   253
  5807.  Size:     6000 4364 200
  5808.  Position: 0 0 0
  5809.  Type:     23
  5810.  Layer:    0
  5811.  OFlags:   r
  5812. End_Chunk
  5813. Chunk: Distancing
  5814.  Visible:   8000
  5815.  Invisible: 8500
  5816.  Replace:   254
  5817. End_Chunk
  5818. ;
  5819. ;-------Object  254-------------------------------------------------------
  5820. ; 
  5821. Chunk: Standard
  5822.  Name:     "door3rd[254]"
  5823.  Number:   254
  5824.  Size:     6000 4364 200
  5825.  Position: 0 0 0
  5826.  Type:     70
  5827.  Layer:    0
  5828.  DFlags:   R
  5829.  OFlags:   i
  5830. End_Chunk
  5831.  
  5832. End_Children
  5833. ;
  5834. ;-------Object  163-------------------------------------------------------
  5835. ; 
  5836. Chunk: Standard
  5837.  Name:     "Oven[163]"
  5838.  Number:   163
  5839.  Size:     6000 4800 400
  5840.  Position: 0 10400 5600
  5841.  Type:     65535
  5842.  Layer:    0
  5843. End_Chunk
  5844. Chunk: Rotations
  5845.  Initial: 0x0000 0x0000 0x0000
  5846.  Centre:  3000 50 100
  5847. End_Chunk
  5848. Chunk: SCL
  5849. long   v00, v01, v02, v03, v04;
  5850.  
  5851.  
  5852.  
  5853. resume (0, 2);
  5854.  
  5855. if (v04==0)
  5856.  
  5857.   v04=-2;
  5858.  
  5859. if (activate (me, 0))
  5860.  
  5861. {
  5862.  
  5863.   v00=1;
  5864.  
  5865.   if (v02==0)
  5866.  
  5867.   {
  5868.  
  5869.     v02=mousey;
  5870.  
  5871.     v03=xrot (me);
  5872.  
  5873.   }
  5874.  
  5875. }
  5876.  
  5877. if (mouseb==0 && v02!=0)
  5878.  
  5879. {
  5880.  
  5881.   v02=0;
  5882.  
  5883.   v00=0;
  5884.  
  5885. }
  5886.  
  5887. if (v00==1)
  5888.  
  5889. {
  5890.  
  5891.   xrot (me)=v03- (mousey-v02)/2;
  5892.  
  5893.   if (xrot (me)>0)
  5894.  
  5895.     xrot (me)=0;
  5896.  
  5897. }
  5898. end
  5899. End_Chunk
  5900.  
  5901. Children:
  5902. ;
  5903. ;-------Object  186-------------------------------------------------------
  5904. ; 
  5905. Chunk: Standard
  5906.  Name:     "Oven[186]"
  5907.  Number:   186
  5908.  Size:     6000 4800 100
  5909.  Position: 0 0 0
  5910.  Type:     52
  5911.  Layer:    0
  5912. End_Chunk
  5913. Chunk: SCL
  5914. long   v00=-1, v01=18, v02=5, v03=5;
  5915.  
  5916.  
  5917.  
  5918. resume (1, 1);
  5919.  
  5920. if (activate (me, 0))
  5921.  
  5922. {
  5923.  
  5924.   waitfs (2);
  5925.  
  5926.   repeat (v01)
  5927.  
  5928.   {
  5929.  
  5930.     xrot (parent (me))+=v02*v00;
  5931.  
  5932.     waitf;
  5933.  
  5934.   }
  5935.  
  5936.   v02=-v02;
  5937.  
  5938.   clrtrig (me, 0);
  5939.  
  5940. }
  5941. end
  5942. End_Chunk
  5943. ;
  5944. ;-------Object  187-------------------------------------------------------
  5945. ; 
  5946. Chunk: Standard
  5947.  Name:     "Oven[187]"
  5948.  Number:   187
  5949.  Size:     5800 200 300
  5950.  Position: 100 4500 100
  5951.  Type:     61
  5952.  Layer:    0
  5953. End_Chunk
  5954. Chunk: Colours
  5955.  Number: 14
  5956.  0x17 0x13 0x1B 0x11 0x1E 0x19 0x16 0x17 0x18 0x19 0x1A 0x1B 0x1C 0x1D
  5957. End_Chunk
  5958. Chunk: SCL
  5959. long   v00, v01, v02, v03, v04;
  5960.  
  5961.  
  5962.  
  5963. resume (0, 2);
  5964.  
  5965. if (v04==0)
  5966.  
  5967.   v04=-2;
  5968.  
  5969. if (activate (me, 0))
  5970.  
  5971. {
  5972.  
  5973.   v00=1;
  5974.  
  5975.   if (v02==0)
  5976.  
  5977.   {
  5978.  
  5979.     v02=mousey;
  5980.  
  5981.     v03=xrot (me);
  5982.  
  5983.   }
  5984.  
  5985. }
  5986.  
  5987. if (mouseb==0 && v02!=0)
  5988.  
  5989. {
  5990.  
  5991.   v02=0;
  5992.  
  5993.   v00=0;
  5994.  
  5995. }
  5996.  
  5997. if (v00==1)
  5998.  
  5999. {
  6000.  
  6001.   xrot (me)=v03- (mousey-v02)/2;
  6002.  
  6003.   if (xrot (me)>0)
  6004.  
  6005.     xrot (me)=0;
  6006.  
  6007. }
  6008. end
  6009. End_Chunk
  6010.  
  6011. End_Children
  6012. ;
  6013. ;-------Object   89-------------------------------------------------------
  6014. ; 
  6015. Chunk: Standard
  6016.  Name:     "Oven[89]"
  6017.  Number:   89
  6018.  Size:     6000 3000 400
  6019.  Position: 0 7356 5600
  6020.  Type:     65535
  6021.  Layer:    0
  6022. End_Chunk
  6023. Chunk: Rotations
  6024.  Initial: 0x0000 0x0000 0x0000
  6025.  Centre:  3000 31 100
  6026. End_Chunk
  6027. Chunk: SCL
  6028. long   v00, v01, v02, v03, v04;
  6029.  
  6030.  
  6031.  
  6032. resume (0, 2);
  6033.  
  6034. if (v04==0)
  6035.  
  6036.   v04=-2;
  6037.  
  6038. if (activate (me, 0))
  6039.  
  6040. {
  6041.  
  6042.   v00=1;
  6043.  
  6044.   if (v02==0)
  6045.  
  6046.   {
  6047.  
  6048.     v02=mousey;
  6049.  
  6050.     v03=xrot (me);
  6051.  
  6052.   }
  6053.  
  6054. }
  6055.  
  6056. if (mouseb==0 && v02!=0)
  6057.  
  6058. {
  6059.  
  6060.   v02=0;
  6061.  
  6062.   v00=0;
  6063.  
  6064. }
  6065.  
  6066. if (v00==1)
  6067.  
  6068. {
  6069.  
  6070.   xrot (me)=v03- (mousey-v02)/2;
  6071.  
  6072.   if (xrot (me)>0)
  6073.  
  6074.     xrot (me)=0;
  6075.  
  6076. }
  6077. end
  6078. End_Chunk
  6079.  
  6080. Children:
  6081. ;
  6082. ;-------Object  189-------------------------------------------------------
  6083. ; 
  6084. Chunk: Standard
  6085.  Name:     "Oven[189]"
  6086.  Number:   189
  6087.  Size:     6000 3000 100
  6088.  Position: 0 0 0
  6089.  Type:     52
  6090.  Layer:    0
  6091. End_Chunk
  6092. Chunk: SCL
  6093. long   v00, v01, v02, v03, v04;
  6094.  
  6095.  
  6096.  
  6097. resume (0, 2);
  6098.  
  6099. if (v04==0)
  6100.  
  6101.   v04=-2;
  6102.  
  6103. if (activate (me, 0))
  6104.  
  6105. {
  6106.  
  6107.   v00=1;
  6108.  
  6109.   if (v02==0)
  6110.  
  6111.   {
  6112.  
  6113.     v02=mousey;
  6114.  
  6115.     v03=xrot (#89);
  6116.  
  6117.   }
  6118.  
  6119. }
  6120.  
  6121. if (mouseb==0 && v02!=0)
  6122.  
  6123. {
  6124.  
  6125.   v02=0;
  6126.  
  6127.   v00=0;
  6128.  
  6129. }
  6130.  
  6131. if (v00==1)
  6132.  
  6133. {
  6134.  
  6135.   xrot (#89)=v03- (mousey-v02)/2;
  6136.  
  6137.   if (xrot (#89)>0)
  6138.  
  6139.     xrot (#89)=0;
  6140.  
  6141. }
  6142. end
  6143. End_Chunk
  6144. ;
  6145. ;-------Object  193-------------------------------------------------------
  6146. ; 
  6147. Chunk: Standard
  6148.  Name:     "Oven[193]"
  6149.  Number:   193
  6150.  Size:     5800 200 300
  6151.  Position: 100 2700 100
  6152.  Type:     61
  6153.  Layer:    0
  6154. End_Chunk
  6155. Chunk: Colours
  6156.  Number: 14
  6157.  0x17 0x13 0x1B 0x11 0x1E 0x19 0x16 0x17 0x18 0x19 0x1A 0x1B 0x1C 0x1D
  6158. End_Chunk
  6159. Chunk: SCL
  6160. long   v00, v01, v02, v03, v04;
  6161.  
  6162.  
  6163.  
  6164. resume (0, 2);
  6165.  
  6166. if (v04==0)
  6167.  
  6168.   v04=-2;
  6169.  
  6170. if (activate (me, 0))
  6171.  
  6172. {
  6173.  
  6174.   v00=1;
  6175.  
  6176.   if (v02==0)
  6177.  
  6178.   {
  6179.  
  6180.     v02=mousey;
  6181.  
  6182.     v03=xrot (me);
  6183.  
  6184.   }
  6185.  
  6186. }
  6187.  
  6188. if (mouseb==0 && v02!=0)
  6189.  
  6190. {
  6191.  
  6192.   v02=0;
  6193.  
  6194.   v00=0;
  6195.  
  6196. }
  6197.  
  6198. if (v00==1)
  6199.  
  6200. {
  6201.  
  6202.   xrot (me)=v03- (mousey-v02)/2;
  6203.  
  6204.   if (xrot (me)>0)
  6205.  
  6206.     xrot (me)=0;
  6207.  
  6208. }
  6209. end
  6210. End_Chunk
  6211.  
  6212. End_Children
  6213. ;
  6214. ;-------Object  164-------------------------------------------------------
  6215. ; 
  6216. Chunk: Standard
  6217.  Name:     "Oven[164]"
  6218.  Number:   164
  6219.  Size:     6000 1300 100
  6220.  Position: 0 15256 5600
  6221.  Type:     51
  6222.  Layer:    0
  6223. End_Chunk
  6224. Chunk: Colours
  6225.  Number: 17
  6226.  0x1C 0x2F 0x1A 0x1B 0x1D 0x14 0x15 0x18 0x1A 0x12 0x13 0x14 0x12 0x12 0x17 0x18
  6227.  0x19
  6228. End_Chunk
  6229.  
  6230. Children:
  6231. ;
  6232. ;-------Object  168-------------------------------------------------------
  6233. ; 
  6234. Chunk: Standard
  6235.  Name:     "Digital-Clock"
  6236.  Number:   168
  6237.  Size:     648 178 0
  6238.  Position: 4880 694 0
  6239.  Type:     65535
  6240.  Layer:    0
  6241.  OFlags:   r
  6242. End_Chunk
  6243. Chunk: Distancing
  6244.  Visible:   15000
  6245.  Invisible: 15937
  6246.  Replace:   0
  6247. End_Chunk
  6248. Chunk: Rotations
  6249.  Initial: 0x0000 0xFFFF8000 0x0000
  6250.  Centre:  324 89 0
  6251. End_Chunk
  6252. Chunk: SCL
  6253. char   mode, h, m, s, d, *p;
  6254.  
  6255.  
  6256.  
  6257.  
  6258.  
  6259.  
  6260.  
  6261.  
  6262.  
  6263.  /*  '*p' is a pointer variable */
  6264.  
  6265.  
  6266.  
  6267. if (mode==0)
  6268.  
  6269. {
  6270.  
  6271.     /* if in 'time' mode then set asci values 'c' in each display element
  6272.  
  6273. relative to the time */
  6274.  
  6275.  
  6276.  
  6277.   time (&h, &m, &s);
  6278.  
  6279.       /*stores the system clock time into variables h,m,s */
  6280.  
  6281.  
  6282.  
  6283.   if (h>11)
  6284.  
  6285.     h-=12;
  6286.  
  6287.   #170.c=s%10+16;
  6288.  
  6289.   #171.c=s/10+16;
  6290.  
  6291.   #172.c=m%10+16;
  6292.  
  6293.   #173.c=m/10+16;
  6294.  
  6295.   #176.c=h%10+16;
  6296.  
  6297.   #177.c=h/10+16;
  6298.  
  6299. }
  6300.  
  6301. else
  6302.  
  6303. {
  6304.  
  6305.     /* if in 'date' mode then set asci values 'c' in each display element
  6306.  
  6307. relative to the date */
  6308.  
  6309.  
  6310.  
  6311.   if (mode==1)
  6312.  
  6313.   {
  6314.  
  6315.     date (&d, &m, &null);
  6316.  
  6317.         /* stores the day and month in variables d,m from
  6318.  
  6319. the system clock */
  6320.  
  6321.  
  6322.  
  6323.     #173.c=0;
  6324.  
  6325.         /* this display element is not needed for date mode */
  6326.  
  6327.  
  6328.  
  6329.     #176.c=d%10+16;
  6330.  
  6331.         /* puts the asci value for date in these two
  6332.  
  6333. elements */
  6334.  
  6335.  
  6336.  
  6337.     #177.c=d/10+16;
  6338.  
  6339.     p="JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC";
  6340.  
  6341.         /* 3 characters are taken at a time from the above string relative to the
  6342.  
  6343. month (m)*/
  6344.  
  6345.  
  6346.  
  6347.     p+=m*3-3;
  6348.  
  6349.     #172.c=*p-32;
  6350.  
  6351.     #171.c=* (p+1)-32;
  6352.  
  6353.     #170.c=* (p+2)-32;
  6354.  
  6355.         /* puts the asci values from above string
  6356.  
  6357. into relative diplay elements */
  6358.  
  6359.  
  6360.  
  6361.   }
  6362.  
  6363. }
  6364. end
  6365. End_Chunk
  6366.  
  6367. Children:
  6368. ;
  6369. ;-------Object  177-------------------------------------------------------
  6370. ; 
  6371. Chunk: Standard
  6372.  Name:     "Disp1[15]"
  6373.  Number:   177
  6374.  Size:     60 121 0
  6375.  Position: 70 28 0
  6376.  Type:     53
  6377.  Layer:    0
  6378. End_Chunk
  6379. Chunk: SCL
  6380. unsigned char    c, pc, Col;
  6381.  
  6382. short  x;
  6383.  
  6384.  
  6385.  
  6386.  
  6387.  
  6388.  
  6389.  
  6390.  
  6391.  
  6392.  
  6393.  
  6394.  
  6395.  
  6396.  
  6397.  
  6398.  
  6399.  
  6400.  
  6401.  
  6402.  
  6403.  
  6404.  
  6405.  
  6406.  
  6407.  
  6408.  
  6409.  
  6410.  
  6411.  
  6412.  
  6413.  
  6414.  /* each element of the display has an asci value in 'c' this is used
  6415.  
  6416. to look up a table which colours the relevent segments */
  6417.  
  6418.  
  6419.  
  6420. Col=0x68;
  6421.  
  6422.     /* This variable defines what colour this elements segments will
  6423.  
  6424. be */
  6425.  
  6426.  
  6427.  
  6428. if (c!=pc)
  6429.  
  6430. {
  6431.  
  6432.   pc=c;
  6433.  
  6434.       /* the table below contains the bitwise values needed to turn on
  6435.  
  6436. the relevent segments of this element. The values are used depending on
  6437.  
  6438. the asci value contained in 'c'. if C=0 (a space) then the value 0 will
  6439.  
  6440. be used to colour the relevent segments, in this case all facets will be
  6441.  
  6442. coloured invisable */
  6443.  
  6444.  
  6445.  
  6446.   x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 
  6447.  
  6448.       8320, 16320, 5440, 8192, 1088, 4096, 8704, 0, 6, 1115, 
  6449.  
  6450.       1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 
  6451.  
  6452.       1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 
  6453.  
  6454.       1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 
  6455.  
  6456.       2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 
  6457.  
  6458.       8713, 57, 2176, 15, 514, 8};
  6459.  
  6460.   repeat (14)
  6461.  
  6462.   {
  6463.  
  6464.     if (x & 8192)
  6465.  
  6466.       setcol (Col, inloop, me);
  6467.  
  6468.     else
  6469.  
  6470.       setcol (0, inloop, me);
  6471.  
  6472.     x+=x;
  6473.  
  6474.   }
  6475.  
  6476. }
  6477. end
  6478. End_Chunk
  6479. Chunk: Default Colours
  6480.  Number: 16
  6481.  0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  6482. End_Chunk
  6483. Chunk: Colours
  6484.  Number: 16
  6485.  0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  6486. End_Chunk
  6487. ;
  6488. ;-------Object  176-------------------------------------------------------
  6489. ; 
  6490. Chunk: Standard
  6491.  Name:     "Disp1[16]"
  6492.  Number:   176
  6493.  Size:     60 121 0
  6494.  Position: 151 28 0
  6495.  Type:     53
  6496.  Layer:    0
  6497. End_Chunk
  6498. Chunk: SCL
  6499. unsigned char    c, pc, Col;
  6500.  
  6501. short  x;
  6502.  
  6503.  
  6504.  
  6505.  
  6506.  
  6507.  
  6508.  
  6509.  
  6510.  
  6511.  
  6512.  
  6513.  
  6514.  
  6515.  
  6516.  
  6517.  
  6518.  
  6519.  
  6520.  
  6521.  
  6522.  
  6523.  
  6524.  
  6525.  
  6526.  
  6527.  /* each element of the display has an asci value in 'c' this is used
  6528.  
  6529. to look up a table which colours the relevent segments */
  6530.  
  6531.  
  6532.  
  6533. Col=0x68;
  6534.  
  6535.     /* This variable defines what colour this elements segments will
  6536.  
  6537. be */
  6538.  
  6539.  
  6540.  
  6541. if (c!=pc)
  6542.  
  6543. {
  6544.  
  6545.   pc=c;
  6546.  
  6547.       /* the table below contains the bitwise values needed to turn on
  6548.  
  6549. the relevent segments of this element. The values are used depending on
  6550.  
  6551. the asci value contained in 'c'. if C=0 (a space) then the value 0 will
  6552.  
  6553. be used to colour the relevent segments, in this case all facets will be
  6554.  
  6555. coloured invisable */
  6556.  
  6557.  
  6558.  
  6559.   x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 
  6560.  
  6561.       8320, 16320, 5440, 8192, 1088, 4096, 8704, 63, 6, 1115, 
  6562.  
  6563.       1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 
  6564.  
  6565.       1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 
  6566.  
  6567.       1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 
  6568.  
  6569.       2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 
  6570.  
  6571.       8713, 57, 2176, 15, 514, 8};
  6572.  
  6573.   repeat (14)
  6574.  
  6575.   {
  6576.  
  6577.     if (x & 8192)
  6578.  
  6579.       setcol (Col, inloop, me);
  6580.  
  6581.     else
  6582.  
  6583.       setcol (0, inloop, me);
  6584.  
  6585.     x+=x;
  6586.  
  6587.   }
  6588.  
  6589. }
  6590. end
  6591. End_Chunk
  6592. Chunk: Default Colours
  6593.  Number: 16
  6594.  0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  6595. End_Chunk
  6596. Chunk: Colours
  6597.  Number: 16
  6598.  0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  6599. End_Chunk
  6600. ;
  6601. ;-------Object  175-------------------------------------------------------
  6602. ; 
  6603. Chunk: Standard
  6604.  Name:     "Disp1[9]"
  6605.  Number:   175
  6606.  Size:     8 48 0
  6607.  Position: 226 64 0
  6608.  Type:     54
  6609.  Layer:    0
  6610. End_Chunk
  6611. Chunk: Colours
  6612.  Number: 3
  6613.  0x68 0x68 0x41
  6614. End_Chunk
  6615. ;
  6616. ;-------Object  174-------------------------------------------------------
  6617. ; 
  6618. Chunk: Standard
  6619.  Name:     "Disp1[12]"
  6620.  Number:   174
  6621.  Size:     8 48 0
  6622.  Position: 413 64 0
  6623.  Type:     54
  6624.  Layer:    0
  6625. End_Chunk
  6626. Chunk: Colours
  6627.  Number: 3
  6628.  0x68 0x68 0x41
  6629. End_Chunk
  6630. ;
  6631. ;-------Object  173-------------------------------------------------------
  6632. ; 
  6633. Chunk: Standard
  6634.  Name:     "Disp1[17]"
  6635.  Number:   173
  6636.  Size:     60 121 0
  6637.  Position: 249 28 0
  6638.  Type:     53
  6639.  Layer:    0
  6640. End_Chunk
  6641. Chunk: SCL
  6642. unsigned char    c, pc, Col;
  6643.  
  6644. short  x;
  6645.  
  6646.  
  6647.  
  6648.  
  6649.  
  6650.  
  6651.  
  6652.  
  6653.  
  6654.  
  6655.  
  6656.  
  6657.  
  6658.  
  6659.  
  6660.  
  6661.  
  6662.  
  6663.  
  6664.  
  6665.  
  6666.  
  6667.  
  6668.  /* each element of the display has an asci value in 'c' this is used
  6669.  
  6670. to look up a table which colours the relevent segments */
  6671.  
  6672.  
  6673.  
  6674. Col=0x68;
  6675.  
  6676.     /* This variable defines what colour this elements segments will
  6677.  
  6678. be */
  6679.  
  6680.  
  6681.  
  6682. if (c!=pc)
  6683.  
  6684. {
  6685.  
  6686.   pc=c;
  6687.  
  6688.       /* the table below contains the bitwise values needed to turn on
  6689.  
  6690. the relevent segments of this element. The values are used depending on
  6691.  
  6692. the asci value contained in 'c'. if C=0 (a space) then the value 0 will
  6693.  
  6694. be used to colour the relevent segments, in this case all facets will be
  6695.  
  6696. coloured invisable */
  6697.  
  6698.  
  6699.  
  6700.   x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 
  6701.  
  6702.       8320, 16320, 5440, 8192, 1088, 4096, 8704, 63, 6, 1115, 
  6703.  
  6704.       1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 
  6705.  
  6706.       1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 
  6707.  
  6708.       1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 
  6709.  
  6710.       2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 
  6711.  
  6712.       8713, 57, 2176, 15, 514, 8};
  6713.  
  6714.   repeat (14)
  6715.  
  6716.   {
  6717.  
  6718.     if (x & 8192)
  6719.  
  6720.       setcol (Col, inloop, me);
  6721.  
  6722.     else
  6723.  
  6724.       setcol (0, inloop, me);
  6725.  
  6726.     x+=x;
  6727.  
  6728.   }
  6729.  
  6730. }
  6731. end
  6732. End_Chunk
  6733. Chunk: Default Colours
  6734.  Number: 16
  6735.  0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  6736. End_Chunk
  6737. Chunk: Colours
  6738.  Number: 16
  6739.  0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  6740. End_Chunk
  6741. ;
  6742. ;-------Object  172-------------------------------------------------------
  6743. ; 
  6744. Chunk: Standard
  6745.  Name:     "Disp1[18]"
  6746.  Number:   172
  6747.  Size:     60 121 0
  6748.  Position: 330 28 0
  6749.  Type:     53
  6750.  Layer:    0
  6751. End_Chunk
  6752. Chunk: SCL
  6753. unsigned char    c, pc, Col;
  6754.  
  6755. short  x;
  6756.  
  6757.  
  6758.  
  6759.  
  6760.  
  6761.  
  6762.  
  6763.  
  6764.  
  6765.  
  6766.  
  6767.  
  6768.  
  6769.  
  6770.  
  6771.  
  6772.  
  6773.  
  6774.  
  6775.  
  6776.  
  6777.  
  6778.  
  6779.  /* each element of the display has an asci value in 'c' this is used
  6780.  
  6781. to look up a table which colours the relevent segments */
  6782.  
  6783.  
  6784.  
  6785. Col=0x68;
  6786.  
  6787.     /* This variable defines what colour this elements segments will
  6788.  
  6789. be */
  6790.  
  6791.  
  6792.  
  6793. if (c!=pc)
  6794.  
  6795. {
  6796.  
  6797.   pc=c;
  6798.  
  6799.       /* the table below contains the bitwise values needed to turn on
  6800.  
  6801. the relevent segments of this element. The values are used depending on
  6802.  
  6803. the asci value contained in 'c'. if C=0 (a space) then the value 0 will
  6804.  
  6805. be used to colour the relevent segments, in this case all facets will be
  6806.  
  6807. coloured invisable */
  6808.  
  6809.  
  6810.  
  6811.   x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 
  6812.  
  6813.       8320, 16320, 5440, 8192, 1088, 4096, 8704, 63, 6, 1115, 
  6814.  
  6815.       1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 
  6816.  
  6817.       1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 
  6818.  
  6819.       1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 
  6820.  
  6821.       2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 
  6822.  
  6823.       8713, 57, 2176, 15, 514, 8};
  6824.  
  6825.   repeat (14)
  6826.  
  6827.   {
  6828.  
  6829.     if (x & 8192)
  6830.  
  6831.       setcol (Col, inloop, me);
  6832.  
  6833.     else
  6834.  
  6835.       setcol (0, inloop, me);
  6836.  
  6837.     x+=x;
  6838.  
  6839.   }
  6840.  
  6841. }
  6842. end
  6843. End_Chunk
  6844. Chunk: Default Colours
  6845.  Number: 16
  6846.  0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  6847. End_Chunk
  6848. Chunk: Colours
  6849.  Number: 16
  6850.  0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  6851. End_Chunk
  6852. ;
  6853. ;-------Object  171-------------------------------------------------------
  6854. ; 
  6855. Chunk: Standard
  6856.  Name:     "Disp1[19]"
  6857.  Number:   171
  6858.  Size:     60 121 0
  6859.  Position: 443 28 0
  6860.  Type:     53
  6861.  Layer:    0
  6862. End_Chunk
  6863. Chunk: SCL
  6864. unsigned char    c, pc, Col;
  6865.  
  6866. short  x;
  6867.  
  6868.  
  6869.  
  6870.  
  6871.  
  6872.  
  6873.  
  6874.  
  6875.  
  6876.  
  6877.  
  6878.  
  6879.  
  6880.  
  6881.  
  6882.  
  6883.  
  6884.  
  6885.  
  6886.  
  6887.  
  6888.  
  6889.  
  6890.  
  6891.  
  6892.  /* each element of the display has an asci value in 'c' this is used
  6893.  
  6894. to look up a table which colours the relevent segments */
  6895.  
  6896.  
  6897.  
  6898. Col=0x68;
  6899.  
  6900.     /* This variable defines what colour this elements segments will
  6901.  
  6902. be */
  6903.  
  6904.  
  6905.  
  6906. if (c!=pc)
  6907.  
  6908. {
  6909.  
  6910.   pc=c;
  6911.  
  6912.       /* the table below contains the bitwise values needed to turn on
  6913.  
  6914. the relevent segments of this element. The values are used depending on
  6915.  
  6916. the asci value contained in 'c'. if C=0 (a space) then the value 0 will
  6917.  
  6918. be used to colour the relevent segments, in this case all facets will be
  6919.  
  6920. coloured invisable */
  6921.  
  6922.  
  6923.  
  6924.   x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 
  6925.  
  6926.       8320, 16320, 5440, 8192, 1088, 4096, 8704, 63, 6, 1115, 
  6927.  
  6928.       1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 
  6929.  
  6930.       1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 
  6931.  
  6932.       1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 
  6933.  
  6934.       2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 
  6935.  
  6936.       8713, 57, 2176, 15, 514, 8};
  6937.  
  6938.   repeat (14)
  6939.  
  6940.   {
  6941.  
  6942.     if (x & 8192)
  6943.  
  6944.       setcol (Col, inloop, me);
  6945.  
  6946.     else
  6947.  
  6948.       setcol (0, inloop, me);
  6949.  
  6950.     x+=x;
  6951.  
  6952.   }
  6953.  
  6954. }
  6955. end
  6956. End_Chunk
  6957. Chunk: Default Colours
  6958.  Number: 16
  6959.  0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  6960. End_Chunk
  6961. Chunk: Colours
  6962.  Number: 16
  6963.  0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  6964. End_Chunk
  6965. ;
  6966. ;-------Object  170-------------------------------------------------------
  6967. ; 
  6968. Chunk: Standard
  6969.  Name:     "Disp1[20]"
  6970.  Number:   170
  6971.  Size:     60 121 0
  6972.  Position: 532 28 0
  6973.  Type:     53
  6974.  Layer:    0
  6975. End_Chunk
  6976. Chunk: SCL
  6977. unsigned char    c, pc, Col;
  6978.  
  6979. short  x;
  6980.  
  6981.  
  6982.  
  6983.  
  6984.  
  6985.  
  6986.  
  6987.  
  6988.  
  6989.  
  6990.  
  6991.  
  6992.  
  6993.  
  6994.  
  6995.  
  6996.  
  6997.  
  6998.  
  6999.  
  7000.  
  7001.  
  7002.  
  7003.  /* each element of the display has an asci value in 'c' this is used
  7004.  
  7005. to look up a table which colours the relevent segments */
  7006.  
  7007.  
  7008.  
  7009. Col=0x68;
  7010.  
  7011.     /* This variable defines what colour this elements segments will
  7012.  
  7013. be */
  7014.  
  7015.  
  7016.  
  7017. if (c!=pc)
  7018.  
  7019. {
  7020.  
  7021.   pc=c;
  7022.  
  7023.       /* the table below contains the bitwise values needed to turn on
  7024.  
  7025. the relevent segments of this element. The values are used depending on
  7026.  
  7027. the asci value contained in 'c'. if C=0 (a space) then the value 0 will
  7028.  
  7029. be used to colour the relevent segments, in this case all facets will be
  7030.  
  7031. coloured invisable */
  7032.  
  7033.  
  7034.  
  7035.   x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 
  7036.  
  7037.       8320, 16320, 5440, 8192, 1088, 4096, 8704, 63, 6, 1115, 
  7038.  
  7039.       1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 
  7040.  
  7041.       1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 
  7042.  
  7043.       1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 
  7044.  
  7045.       2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 
  7046.  
  7047.       8713, 57, 2176, 15, 514, 8};
  7048.  
  7049.   repeat (14)
  7050.  
  7051.   {
  7052.  
  7053.     if (x & 8192)
  7054.  
  7055.       setcol (Col, inloop, me);
  7056.  
  7057.     else
  7058.  
  7059.       setcol (0, inloop, me);
  7060.  
  7061.     x+=x;
  7062.  
  7063.   }
  7064.  
  7065. }
  7066. end
  7067. End_Chunk
  7068. Chunk: Default Colours
  7069.  Number: 16
  7070.  0x0C 0xC7 0xC7 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  7071. End_Chunk
  7072. Chunk: Colours
  7073.  Number: 16
  7074.  0x0C 0xC7 0xC7 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x00 0x41
  7075. End_Chunk
  7076. ;
  7077. ;-------Object  178-------------------------------------------------------
  7078. ; 
  7079. Chunk: Standard
  7080.  Name:     "Switch"
  7081.  Number:   178
  7082.  Size:     16 16 0
  7083.  Position: 14 73 0
  7084.  Type:     55
  7085.  Layer:    0
  7086. End_Chunk
  7087. Chunk: Distancing
  7088.  Visible:   610
  7089.  Invisible: 648
  7090.  Replace:   179
  7091. End_Chunk
  7092. Chunk: Colours
  7093.  Number: 26
  7094.  0x51 0xBA 0xBC 0xBC 0xBB 0xBC 0xB8 0x50 0x51 0xB8 0xBB 0xBE 0xBA 0xBB 0xBC 0xBC
  7095.  0xBE 0x25 0xBF 0xBC 0xBA 0x51 0xB8 0x51 0xBA 0x41
  7096. End_Chunk
  7097. Chunk: SCL
  7098. if (activate (me, 0))
  7099.  
  7100. {
  7101.  
  7102.     /* whilst button is activated then mode='date' and make dots invisable */
  7103.  
  7104.  
  7105.  
  7106.   #168.mode=1;
  7107.  
  7108.   invis (#175);
  7109.  
  7110.   invis (#174);
  7111.  
  7112. }
  7113.  
  7114. else
  7115.  
  7116. {
  7117.  
  7118.     /* if button is not being pressed then revert to time display and make
  7119.  
  7120. dots visable */
  7121.  
  7122.  
  7123.  
  7124.   if (#168.mode==1)
  7125.  
  7126.   {
  7127.  
  7128.     #168.mode=0;
  7129.  
  7130.     vis (#175);
  7131.  
  7132.     vis (#174);
  7133.  
  7134.   }
  7135.  
  7136. }
  7137. end
  7138. End_Chunk
  7139. ;
  7140. ;-------Object  179-------------------------------------------------------
  7141. ; 
  7142. Chunk: Standard
  7143.  Name:     "Switch[35]"
  7144.  Number:   179
  7145.  Size:     16 16 0
  7146.  Position: 14 73 0
  7147.  Type:     56
  7148.  Layer:    0
  7149.  DFlags:   R
  7150.  OFlags:   i
  7151. End_Chunk
  7152. Chunk: Colours
  7153.  Number: 6
  7154.  0xB8 0xBA 0xBC 0x81 0xBA 0xBD
  7155. End_Chunk
  7156. Chunk: SCL
  7157. if (activate (me, 0))
  7158.  
  7159. {
  7160.  
  7161.     /* whilst button is activated then mode='date' and make dots invisable */
  7162.  
  7163.  
  7164.  
  7165.   #168.mode=1;
  7166.  
  7167.   invis (#175);
  7168.  
  7169.   invis (#174);
  7170.  
  7171. }
  7172.  
  7173. else
  7174.  
  7175. {
  7176.  
  7177.     /* if button is not being pressed then revert to time display and make
  7178.  
  7179. dots visable */
  7180.  
  7181.  
  7182.  
  7183.   if (#168.mode==1)
  7184.  
  7185.   {
  7186.  
  7187.     #168.mode=0;
  7188.  
  7189.     vis (#175);
  7190.  
  7191.     vis (#174);
  7192.  
  7193.   }
  7194.  
  7195. }
  7196. end
  7197. End_Chunk
  7198.  
  7199. End_Children
  7200.  
  7201. End_Children
  7202. ;
  7203. ;-------Object   86-------------------------------------------------------
  7204. ; 
  7205. Chunk: Standard
  7206.  Name:     "Oven[86]"
  7207.  Number:   86
  7208.  Size:     6000 3000 5600
  7209.  Position: 0 7356 0
  7210.  Type:     57
  7211.  Layer:    0
  7212. End_Chunk
  7213. Chunk: Colours
  7214.  Number: 10
  7215.  0x7F 0x26 0x2F 0x26 0xBC 0x00 0x20 0x29 0x2C 0xB9
  7216. End_Chunk
  7217. ;
  7218. ;-------Object  180-------------------------------------------------------
  7219. ; 
  7220. Chunk: Standard
  7221.  Name:     "Oven[180]"
  7222.  Number:   180
  7223.  Size:     6000 4900 5600
  7224.  Position: 0 10356 0
  7225.  Type:     57
  7226.  Layer:    0
  7227. End_Chunk
  7228. Chunk: Colours
  7229.  Number: 10
  7230.  0x7F 0x26 0x2F 0x26 0xBC 0xBE 0x20 0x29 0x2C 0xB9
  7231. End_Chunk
  7232. ;
  7233. ;-------Object  181-------------------------------------------------------
  7234. ; 
  7235. Chunk: Standard
  7236.  Name:     "Oven[181]"
  7237.  Number:   181
  7238.  Size:     6000 1300 5600
  7239.  Position: 0 15256 0
  7240.  Type:     0
  7241.  Layer:    0
  7242. End_Chunk
  7243. Chunk: Colours
  7244.  Number: 6
  7245.  0xBC 0x00 0xB9 0x16 0x00 0x00
  7246. End_Chunk
  7247. ;
  7248. ;-------Object  182-------------------------------------------------------
  7249. ; 
  7250. Chunk: Standard
  7251.  Name:     "Oven[182]"
  7252.  Number:   182
  7253.  Size:     6000 4364 5600
  7254.  Position: 0 16556 0
  7255.  Type:     58
  7256.  Layer:    0
  7257. End_Chunk
  7258. Chunk: Colours
  7259.  Number: 10
  7260.  0x7F 0xBB 0xBF 0xBB 0xBC 0xBE 0xBA 0xB7 0xBD 0xB9
  7261. End_Chunk
  7262. ;
  7263. ;-------Object  160-------------------------------------------------------
  7264. ; 
  7265. Chunk: Standard
  7266.  Name:     "Oven[160]"
  7267.  Number:   160
  7268.  Size:     400 400 150
  7269.  Position: 3350 15600 5750
  7270.  Type:     65535
  7271.  Layer:    0
  7272. End_Chunk
  7273.  
  7274. Children:
  7275. ;
  7276. ;-------Object  165-------------------------------------------------------
  7277. ; 
  7278. Chunk: Standard
  7279.  Name:     "Oven[165]"
  7280.  Number:   165
  7281.  Size:     400 400 150
  7282.  Position: 0 0 0
  7283.  Type:     49
  7284.  Layer:    0
  7285.  OFlags:   r
  7286. End_Chunk
  7287. Chunk: Distancing
  7288.  Visible:   3000
  7289.  Invisible: 3187
  7290.  Replace:   161
  7291. End_Chunk
  7292. ;
  7293. ;-------Object  161-------------------------------------------------------
  7294. ; 
  7295. Chunk: Standard
  7296.  Name:     "Oven[161]"
  7297.  Number:   161
  7298.  Size:     400 400 150
  7299.  Position: 0 0 0
  7300.  Type:     73
  7301.  Layer:    0
  7302.  DFlags:   R
  7303.  OFlags:   i
  7304. End_Chunk
  7305.  
  7306. End_Children
  7307. ;
  7308. ;-------Object  162-------------------------------------------------------
  7309. ; 
  7310. Chunk: Standard
  7311.  Name:     "Oven[162]"
  7312.  Number:   162
  7313.  Size:     400 400 150
  7314.  Position: 2050 15600 5750
  7315.  Type:     65535
  7316.  Layer:    0
  7317. End_Chunk
  7318.  
  7319. Children:
  7320. ;
  7321. ;-------Object  277-------------------------------------------------------
  7322. ; 
  7323. Chunk: Standard
  7324.  Name:     "Oven[277]"
  7325.  Number:   277
  7326.  Size:     400 400 150
  7327.  Position: 0 0 0
  7328.  Type:     49
  7329.  Layer:    0
  7330.  OFlags:   r
  7331. End_Chunk
  7332. Chunk: Distancing
  7333.  Visible:   3000
  7334.  Invisible: 3187
  7335.  Replace:   278
  7336. End_Chunk
  7337. ;
  7338. ;-------Object  278-------------------------------------------------------
  7339. ; 
  7340. Chunk: Standard
  7341.  Name:     "Oven[278]"
  7342.  Number:   278
  7343.  Size:     400 400 150
  7344.  Position: 0 0 0
  7345.  Type:     73
  7346.  Layer:    0
  7347.  DFlags:   R
  7348.  OFlags:   i
  7349. End_Chunk
  7350.  
  7351. End_Children
  7352. ;
  7353. ;-------Object  279-------------------------------------------------------
  7354. ; 
  7355. Chunk: Standard
  7356.  Name:     "Oven[279]"
  7357.  Number:   279
  7358.  Size:     400 400 150
  7359.  Position: 750 15600 5750
  7360.  Type:     65535
  7361.  Layer:    0
  7362. End_Chunk
  7363.  
  7364. Children:
  7365. ;
  7366. ;-------Object  280-------------------------------------------------------
  7367. ; 
  7368. Chunk: Standard
  7369.  Name:     "Oven[280]"
  7370.  Number:   280
  7371.  Size:     400 400 150
  7372.  Position: 0 0 0
  7373.  Type:     49
  7374.  Layer:    0
  7375.  OFlags:   r
  7376. End_Chunk
  7377. Chunk: Distancing
  7378.  Visible:   3000
  7379.  Invisible: 3187
  7380.  Replace:   281
  7381. End_Chunk
  7382. ;
  7383. ;-------Object  281-------------------------------------------------------
  7384. ; 
  7385. Chunk: Standard
  7386.  Name:     "Oven[281]"
  7387.  Number:   281
  7388.  Size:     400 400 150
  7389.  Position: 0 0 0
  7390.  Type:     73
  7391.  Layer:    0
  7392.  DFlags:   R
  7393.  OFlags:   i
  7394. End_Chunk
  7395.  
  7396. End_Children
  7397.  
  7398. End_Children
  7399. ;
  7400. ;-------Object  401-------------------------------------------------------
  7401. ; 
  7402. Chunk: Standard
  7403.  Name:     "SE-FloorCabinets-Area[401]"
  7404.  Number:   401
  7405.  Size:     24350 9100 13350
  7406.  Position: 6700 0 0
  7407.  Type:     65535
  7408.  Layer:    0
  7409. End_Chunk
  7410.  
  7411. Children:
  7412. ;
  7413. ;-------Object  400-------------------------------------------------------
  7414. ; 
  7415. Chunk: Standard
  7416.  Name:     "SE-FloorCabinets-Area"
  7417.  Number:   400
  7418.  Size:     24350 8820 13350
  7419.  Position: 0 0 0
  7420.  Type:     65535
  7421.  Layer:    0
  7422. End_Chunk
  7423.  
  7424. Children:
  7425. ;
  7426. ;-------Object   90-------------------------------------------------------
  7427. ; 
  7428. Chunk: Standard
  7429.  Name:     "DrawerLineUnit[90]"
  7430.  Number:   90
  7431.  Size:     5000 8820 6000
  7432.  Position: 0 0 0
  7433.  Type:     65535
  7434.  Layer:    0
  7435. End_Chunk
  7436. Chunk: SCL
  7437. short  v00;
  7438.  
  7439.  
  7440. end
  7441. End_Chunk
  7442.  
  7443. Children:
  7444. ;
  7445. ;-------Object   51-------------------------------------------------------
  7446. ; 
  7447. Chunk: Standard
  7448.  Name:     "DrawerLineUnit"
  7449.  Number:   51
  7450.  Size:     5000 1500 4900
  7451.  Position: 0 0 0
  7452.  Type:     0
  7453.  Layer:    0
  7454. End_Chunk
  7455. Chunk: Colours
  7456.  Number: 6
  7457.  0x00 0x00 0x00 0xBD 0x00 0x00
  7458. End_Chunk
  7459. ;
  7460. ;-------Object  195-------------------------------------------------------
  7461. ; 
  7462. Chunk: Standard
  7463.  Name:     "DrawerLineUnit[195]"
  7464.  Number:   195
  7465.  Size:     5000 5856 5600
  7466.  Position: 0 1500 0
  7467.  Type:     58
  7468.  Layer:    0
  7469. End_Chunk
  7470. Chunk: SCL
  7471. if (gvar (0, parent (me))!=0)
  7472.  
  7473.   vis (me);
  7474.  
  7475. else
  7476.  
  7477.   invis (me);
  7478.  
  7479.  
  7480. end
  7481. End_Chunk
  7482. Chunk: Colours
  7483.  Number: 10
  7484.  0x7F 0xBB 0xBF 0xBB 0x00 0x00 0xBA 0xB7 0xBD 0x00
  7485. End_Chunk
  7486. ;
  7487. ;-------Object  208-------------------------------------------------------
  7488. ; 
  7489. Chunk: Standard
  7490.  Name:     "door hold[208]"
  7491.  Number:   208
  7492.  Size:     5000 5856 200
  7493.  Position: 0 1500 5600
  7494.  Type:     113
  7495.  Layer:    1
  7496. End_Chunk
  7497. Chunk: TexCoords
  7498.  Number: 1
  7499.  Mode:   0
  7500.  SubChunk
  7501.   Facet:     3
  7502.   ImageRef:  1
  7503.   PixScale:  0
  7504.   NumCoords: 4
  7505.     0.00000 0.00000
  7506.     0.00000 1.00000
  7507.     1.00000 1.00000
  7508.     1.00000 0.00000
  7509. End_Chunk
  7510. Chunk: Colours
  7511.  Number: 6
  7512.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  7513. End_Chunk
  7514.  
  7515. Chunk: ImageRef
  7516.  Number: 4
  7517.  Index: 1 Image: 1
  7518.  Index: 2 Image: 2
  7519.  Index: 3 Image: 3
  7520.  Index: 4 Image: 4
  7521. End_Chunk
  7522. Chunk: SCL
  7523. short  v00=-1, v01=20, v02=5, v03=5;
  7524.  
  7525.  
  7526.  
  7527. resume (1, 1);
  7528.  
  7529. if (activate (me, 0) || activate (child (me), 0) || activate 
  7530.  
  7531.     (sibling (child (me)), 0) || activate (sibling (sibling 
  7532.  
  7533.     (child (me))), 0))
  7534.  
  7535. {
  7536.  
  7537.   gvar (0, parent (me))=1;
  7538.  
  7539.   waitfs (3);
  7540.  
  7541.   repeat (v01)
  7542.  
  7543.   {
  7544.  
  7545.     yrot (me)+=v02*v00;
  7546.  
  7547.     waitf;
  7548.  
  7549.   }
  7550.  
  7551.   v02=-v02;
  7552.  
  7553.   if (v02==v03)
  7554.  
  7555.     gvar (0, parent (me))=0;
  7556.  
  7557.   clrtrig (me, 0);
  7558.  
  7559.   clrtrig (child (me), 0);
  7560.  
  7561.   clrtrig (sibling (child (me)), 0);
  7562.  
  7563.   clrtrig (sibling (sibling (child (me))), 0);
  7564.  
  7565. }
  7566. end
  7567. End_Chunk
  7568. Chunk: Rotations
  7569.  Initial: 0x0000 0x0000 0x0000
  7570.  Centre:  243 2928 0
  7571. End_Chunk
  7572.  
  7573. Children:
  7574. ;
  7575. ;-------Object  209-------------------------------------------------------
  7576. ; 
  7577. Chunk: Standard
  7578.  Name:     "door1st[209]"
  7579.  Number:   209
  7580.  Size:     5000 5856 200
  7581.  Position: 0 0 0
  7582.  Type:     59
  7583.  Layer:    0
  7584.  OFlags:   r
  7585. End_Chunk
  7586. Chunk: Distancing
  7587.  Visible:   6000
  7588.  Invisible: 6375
  7589.  Replace:   210
  7590. End_Chunk
  7591. ;
  7592. ;-------Object  210-------------------------------------------------------
  7593. ; 
  7594. Chunk: Standard
  7595.  Name:     "door2nd[210]"
  7596.  Number:   210
  7597.  Size:     5000 5856 200
  7598.  Position: 0 0 0
  7599.  Type:     23
  7600.  Layer:    0
  7601.  OFlags:   rIi
  7602. End_Chunk
  7603. Chunk: Distancing
  7604.  Visible:   8000
  7605.  Invisible: 8500
  7606.  Replace:   211
  7607. End_Chunk
  7608. ;
  7609. ;-------Object  211-------------------------------------------------------
  7610. ; 
  7611. Chunk: Standard
  7612.  Name:     "door3rd[211]"
  7613.  Number:   211
  7614.  Size:     5000 5856 200
  7615.  Position: 0 0 0
  7616.  Type:     70
  7617.  Layer:    0
  7618.  DFlags:   R
  7619.  OFlags:   i
  7620. End_Chunk
  7621.  
  7622. End_Children
  7623. ;
  7624. ;-------Object  758-------------------------------------------------------
  7625. ; 
  7626. Chunk: Standard
  7627.  Name:     "DrawerLineUnit[758]"
  7628.  Number:   758
  7629.  Size:     5000 1464 200
  7630.  Position: 0 7356 5600
  7631.  Type:     113
  7632.  Layer:    1
  7633. End_Chunk
  7634. Chunk: TexCoords
  7635.  Number: 1
  7636.  Mode:   0
  7637.  SubChunk
  7638.   Facet:     3
  7639.   ImageRef:  1
  7640.   PixScale:  0
  7641.   NumCoords: 4
  7642.     0.00000 0.00000
  7643.     0.00000 1.00000
  7644.     1.00000 1.00000
  7645.     1.00000 0.00000
  7646. End_Chunk
  7647. Chunk: Colours
  7648.  Number: 6
  7649.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  7650. End_Chunk
  7651.  
  7652. Chunk: ImageRef
  7653.  Number: 4
  7654.  Index: 1 Image: 1
  7655.  Index: 2 Image: 2
  7656.  Index: 3 Image: 3
  7657.  Index: 4 Image: 4
  7658. End_Chunk
  7659.  
  7660. Children:
  7661. ;
  7662. ;-------Object   92-------------------------------------------------------
  7663. ; 
  7664. Chunk: Standard
  7665.  Name:     "DrawerLineUnit[92]"
  7666.  Number:   92
  7667.  Size:     5000 1464 200
  7668.  Position: 0 0 0
  7669.  Type:     22
  7670.  Layer:    0
  7671. End_Chunk
  7672.  
  7673. End_Children
  7674.  
  7675. End_Children
  7676. ;
  7677. ;-------Object  199-------------------------------------------------------
  7678. ; 
  7679. Chunk: Standard
  7680.  Name:     "HobUnit[199]"
  7681.  Number:   199
  7682.  Size:     9350 8820 9350
  7683.  Position: 15000 0 0
  7684.  Type:     65535
  7685.  Layer:    0
  7686. End_Chunk
  7687. Chunk: SCL
  7688. long   x, y;
  7689.  
  7690.  
  7691. end
  7692. End_Chunk
  7693.  
  7694. Children:
  7695. ;
  7696. ;-------Object   54-------------------------------------------------------
  7697. ; 
  7698. Chunk: Standard
  7699.  Name:     "HobUnit[54]"
  7700.  Number:   54
  7701.  Size:     4900 1500 9350
  7702.  Position: 4450 0 0
  7703.  Type:     0
  7704.  Layer:    0
  7705. End_Chunk
  7706. Chunk: Colours
  7707.  Number: 6
  7708.  0xBC 0x00 0x00 0x00 0x00 0x00
  7709. End_Chunk
  7710. ;
  7711. ;-------Object  201-------------------------------------------------------
  7712. ; 
  7713. Chunk: Standard
  7714.  Name:     "HobUnit[201]"
  7715.  Number:   201
  7716.  Size:     5600 5856 3750
  7717.  Position: 3750 1500 5600
  7718.  Type:     108
  7719.  Layer:    0
  7720. End_Chunk
  7721. Chunk: Colours
  7722.  Number: 10
  7723.  0xBA 0xBB 0xBF 0x00 0x00 0xBE 0xBA 0xB8 0xBB 0xBA
  7724. End_Chunk
  7725. ;
  7726. ;-------Object  765-------------------------------------------------------
  7727. ; 
  7728. Chunk: Standard
  7729.  Name:     "HobUnit[765]"
  7730.  Number:   765
  7731.  Size:     200 1464 3550
  7732.  Position: 3550 7356 5800
  7733.  Type:     113
  7734.  Layer:    1
  7735. End_Chunk
  7736. Chunk: TexCoords
  7737.  Number: 1
  7738.  Mode:   0
  7739.  SubChunk
  7740.   Facet:     4
  7741.   ImageRef:  1
  7742.   PixScale:  0
  7743.   NumCoords: 4
  7744.     0.00000 0.00000
  7745.     0.00000 1.00000
  7746.     1.00000 1.00000
  7747.     1.00000 0.00000
  7748. End_Chunk
  7749. Chunk: Colours
  7750.  Number: 6
  7751.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  7752. End_Chunk
  7753.  
  7754. Chunk: ImageRef
  7755.  Number: 4
  7756.  Index: 1 Image: 1
  7757.  Index: 2 Image: 2
  7758.  Index: 3 Image: 3
  7759.  Index: 4 Image: 4
  7760. End_Chunk
  7761.  
  7762. Children:
  7763. ;
  7764. ;-------Object  205-------------------------------------------------------
  7765. ; 
  7766. Chunk: Standard
  7767.  Name:     "HobUnit[205]"
  7768.  Number:   205
  7769.  Size:     200 1464 3550
  7770.  Position: 0 0 0
  7771.  Type:     24
  7772.  Layer:    0
  7773. End_Chunk
  7774.  
  7775. End_Children
  7776. ;
  7777. ;-------Object  200-------------------------------------------------------
  7778. ; 
  7779. Chunk: Standard
  7780.  Name:     "HobUnit[200]"
  7781.  Number:   200
  7782.  Size:     4450 1500 4900
  7783.  Position: 0 0 0
  7784.  Type:     0
  7785.  Layer:    0
  7786. End_Chunk
  7787. Chunk: Colours
  7788.  Number: 6
  7789.  0x00 0x00 0x00 0xBD 0x00 0x00
  7790. End_Chunk
  7791. ;
  7792. ;-------Object  203-------------------------------------------------------
  7793. ; 
  7794. Chunk: Standard
  7795.  Name:     "HobUnit[203]"
  7796.  Number:   203
  7797.  Size:     9350 5856 5600
  7798.  Position: 0 1500 0
  7799.  Type:     109
  7800.  Layer:    0
  7801. End_Chunk
  7802. Chunk: Colours
  7803.  Number: 10
  7804.  0x7F 0xBB 0xBF 0xBB 0x00 0x00 0xBB 0xB8 0xBD 0x00
  7805. End_Chunk
  7806. ;
  7807. ;-------Object  761-------------------------------------------------------
  7808. ; 
  7809. Chunk: Standard
  7810.  Name:     "door hold[761]"
  7811.  Number:   761
  7812.  Size:     3750 5856 3750
  7813.  Position: 0 1500 5600
  7814.  Type:     114
  7815.  Layer:    1
  7816. End_Chunk
  7817. Chunk: TexCoords
  7818.  Number: 2
  7819.  Mode:   0
  7820.  SubChunk
  7821.   Facet:     2
  7822.   ImageRef:  1
  7823.   PixScale:  0
  7824.   NumCoords: 4
  7825.     0.00000 0.00000
  7826.     0.00000 1.00000
  7827.     1.00000 1.00000
  7828.     1.00000 0.00000
  7829.  SubChunk
  7830.   Facet:     1
  7831.   ImageRef:  1
  7832.   PixScale:  0
  7833.   NumCoords: 4
  7834.     0.00000 0.00000
  7835.     0.00000 1.00000
  7836.     1.00000 1.00000
  7837.     1.00000 0.00000
  7838. End_Chunk
  7839. Chunk: Colours
  7840.  Number: 130
  7841.  0xBB 0xBC 0xB9 0xBB 0xB9 0xBB 0xBC 0xBD 0xBC 0xBB 0xBD 0xB8 0xBB 0xBC 0xB9 0xB9
  7842.  0xBB 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB9 0xB7 0xBB 0xBA 0xB9 0xBA 0xBB 0xBC 0xBC
  7843.  0xBB 0xBC 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xB8 0xB9 0xB9
  7844.  0xB8 0xB7 0xB6 0xB7 0xB7 0xB6 0xBB 0xBC 0xB8 0xB7 0xBC 0xBD 0xBD 0xBD 0xB6 0xB7
  7845.  0xBE 0xBA 0xB7 0xBB 0xBB 0xB9 0xBB 0xBC 0xBD 0xBC 0xBB 0xBD 0xB8 0xBB 0xBC 0xB9
  7846.  0xB9 0xBB 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xB6 0xB9 0xBB 0xBA 0xB9 0xBA 0xBB
  7847.  0xBC 0xBC 0xBB 0xBC 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xB8
  7848.  0xB9 0xB9 0xB8 0xB7 0xB6 0xB7 0xB7 0xBB 0xBC 0xBD 0xB6 0xB7 0xBE 0xB8 0xB7 0xBC
  7849.  0xBD 0xBD
  7850. End_Chunk
  7851. Chunk: SCL
  7852. short  v00=-1, v01=18, v02=5, v04=4, v03=5;
  7853.  
  7854.  
  7855.  
  7856. /*
  7857.  
  7858.  
  7859.  
  7860.         v00     Determines which side the door is hinged on.
  7861.  
  7862.         v01     stores how many frames the door will open over.
  7863.  
  7864.         v02     stores magnitude and direction of first hinge rotation.
  7865.  
  7866.         v03     stores the initial fisrt hinge status.
  7867.  
  7868.         v04     stores magnitude and direction of second hinge rotation.
  7869.  
  7870.  
  7871.  
  7872. */
  7873.  
  7874. resume (1, 1);
  7875.  
  7876. if (activate (me, 0) || activate (child (me), 0))
  7877.  
  7878. {
  7879.  
  7880. /*
  7881.  
  7882.  
  7883.  
  7884.             visiblise the inside of the cupboard
  7885.  
  7886.  
  7887.  
  7888. */
  7889.  
  7890.  
  7891.  
  7892.  
  7893.  
  7894.   vis (#201);
  7895.  
  7896.   vis (#203);
  7897.  
  7898.   waitfs (3);
  7899.  
  7900. /*
  7901.  
  7902.  
  7903.  
  7904.             open/close cupboard
  7905.  
  7906.  
  7907.  
  7908. */
  7909.  
  7910.  
  7911.  
  7912.   repeat (v01)
  7913.  
  7914.   {
  7915.  
  7916.     ybend (1, me)+=v04*v00;
  7917.  
  7918.     ybend (2, me)+=v02*v00;
  7919.  
  7920.     ybend (1, child (me))+=v04*v00;
  7921.  
  7922.     ybend (2, child (me))+=v02*v00;
  7923.  
  7924.     waitf;
  7925.  
  7926.   }
  7927.  
  7928. /*
  7929.  
  7930.  
  7931.  
  7932.             set up direction change for next time
  7933.  
  7934.  
  7935.  
  7936. */
  7937.  
  7938.   v02=-v02;
  7939.  
  7940.   v04=-v04;
  7941.  
  7942.  
  7943.  
  7944. /*
  7945.  
  7946.  
  7947.  
  7948.             if doors are closed ensure that the inside of the
  7949.  
  7950.             cupboard is invisible
  7951.  
  7952.  
  7953.  
  7954. */
  7955.  
  7956.   if (v02==v03)
  7957.  
  7958.   {
  7959.  
  7960.     invis (#201);
  7961.  
  7962.     invis (#203);
  7963.  
  7964.   }
  7965.  
  7966.   clrtrig (me, 0);
  7967.  
  7968.   clrtrig (child (me), 0);
  7969.  
  7970. }
  7971. end
  7972. End_Chunk
  7973.  
  7974. Chunk: ImageRef
  7975.  Number: 4
  7976.  Index: 1 Image: 1
  7977.  Index: 2 Image: 2
  7978.  Index: 3 Image: 3
  7979.  Index: 4 Image: 4
  7980. End_Chunk
  7981. Chunk: Bending
  7982.  Number: 2
  7983.  Subchunk
  7984.   Angle:  0 0 0
  7985.    First:  9
  7986.   Last:   22
  7987.   Centre: 8
  7988.  Subchunk
  7989.   Angle:  0 0 0
  7990.    First:  17
  7991.   Last:   22
  7992.   Centre: 15
  7993. End_Chunk
  7994.  
  7995. Children:
  7996. ;
  7997. ;-------Object  100-------------------------------------------------------
  7998. ; 
  7999. Chunk: Standard
  8000.  Name:     "door hold[100]"
  8001.  Number:   100
  8002.  Size:     3750 5856 3750
  8003.  Position: 0 0 0
  8004.  Type:     107
  8005.  Layer:    0
  8006. End_Chunk
  8007. Chunk: Bending
  8008.  Number: 2
  8009.  Subchunk
  8010.   Angle:  0 0 0
  8011.    First:  9
  8012.   Last:   164
  8013.   Centre: 8
  8014.  Subchunk
  8015.   Angle:  0 0 0
  8016.    First:  88
  8017.   Last:   164
  8018.   Centre: 87
  8019. End_Chunk
  8020.  
  8021. End_Children
  8022. ;
  8023. ;-------Object  764-------------------------------------------------------
  8024. ; 
  8025. Chunk: Standard
  8026.  Name:     "HobUnit[764]"
  8027.  Number:   764
  8028.  Size:     3550 1464 200
  8029.  Position: 0 7356 5600
  8030.  Type:     113
  8031.  Layer:    1
  8032. End_Chunk
  8033. Chunk: TexCoords
  8034.  Number: 1
  8035.  Mode:   0
  8036.  SubChunk
  8037.   Facet:     3
  8038.   ImageRef:  1
  8039.   PixScale:  0
  8040.   NumCoords: 4
  8041.     0.00000 0.00000
  8042.     0.00000 1.00000
  8043.     1.00000 1.00000
  8044.     1.00000 0.00000
  8045. End_Chunk
  8046. Chunk: Colours
  8047.  Number: 6
  8048.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  8049. End_Chunk
  8050.  
  8051. Chunk: ImageRef
  8052.  Number: 4
  8053.  Index: 1 Image: 1
  8054.  Index: 2 Image: 2
  8055.  Index: 3 Image: 3
  8056.  Index: 4 Image: 4
  8057. End_Chunk
  8058.  
  8059. Children:
  8060. ;
  8061. ;-------Object  206-------------------------------------------------------
  8062. ; 
  8063. Chunk: Standard
  8064.  Name:     "HobUnit[206]"
  8065.  Number:   206
  8066.  Size:     3550 1464 200
  8067.  Position: 0 0 0
  8068.  Type:     22
  8069.  Layer:    0
  8070. End_Chunk
  8071. Chunk: Colours
  8072.  Number: 65
  8073.  0xBA 0xB7 0xBB 0xBB 0xB9 0xBB 0xBC 0xBD 0xBC 0xBB 0xBD 0xB8 0xBB 0xBC 0xB9 0xB9
  8074.  0xBB 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB9 0xB7 0xBB 0xBA 0xB9 0xBA 0xBB 0xBC 0xBC
  8075.  0xBB 0xBC 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xBA 0xB8 0xB9 0xB9
  8076.  0xB8 0xB7 0xB6 0xB7 0xB7 0xB6 0xBB 0xBC 0xB8 0xB7 0xBC 0xBD 0xBD 0xBD 0xB6 0xB7
  8077.  0xBE
  8078. End_Chunk
  8079.  
  8080. End_Children
  8081.  
  8082. End_Children
  8083. ;
  8084. ;-------Object   53-------------------------------------------------------
  8085. ; 
  8086. Chunk: Standard
  8087.  Name:     "FloorUnit[53]"
  8088.  Number:   53
  8089.  Size:     6000 8820 4000
  8090.  Position: 18350 0 9350
  8091.  Type:     65535
  8092.  Layer:    0
  8093. End_Chunk
  8094. Chunk: Colours
  8095.  Number: 18
  8096.  0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B
  8097.  0x0B 0x0B
  8098. End_Chunk
  8099. Chunk: SCL
  8100. short  cupb;
  8101.  
  8102.  
  8103.  
  8104.  
  8105.  
  8106.  
  8107.  
  8108.  
  8109.  
  8110. /*
  8111.  
  8112.             this variable is used to pass parameters from the 
  8113.  
  8114.             door group to the inside of the cupboard   
  8115.  
  8116. /*
  8117.  
  8118.  
  8119.  
  8120.  
  8121.  
  8122.  
  8123. end
  8124. End_Chunk
  8125.  
  8126. Children:
  8127. ;
  8128. ;-------Object   55-------------------------------------------------------
  8129. ; 
  8130. Chunk: Standard
  8131.  Name:     "FloorUnit"
  8132.  Number:   55
  8133.  Size:     4900 1500 4000
  8134.  Position: 1100 0 0
  8135.  Type:     0
  8136.  Layer:    0
  8137. End_Chunk
  8138. Chunk: Colours
  8139.  Number: 6
  8140.  0xBC 0x00 0x00 0xBB 0x00 0x00
  8141. End_Chunk
  8142. ;
  8143. ;-------Object  198-------------------------------------------------------
  8144. ; 
  8145. Chunk: Standard
  8146.  Name:     "cupinside"
  8147.  Number:   198
  8148.  Size:     5600 5856 4000
  8149.  Position: 400 1500 0
  8150.  Type:     64
  8151.  Layer:    0
  8152. End_Chunk
  8153. Chunk: SCL
  8154. /*
  8155.  
  8156.         Read variable from parent to see if there is a request
  8157.  
  8158.         to be visible or invisible and act accordingly
  8159.  
  8160. */
  8161.  
  8162. if (gvar (0, parent (me))!=0)
  8163.  
  8164.   vis (me);
  8165.  
  8166. else
  8167.  
  8168.   invis (me);
  8169.  
  8170.  
  8171. end
  8172. End_Chunk
  8173. Chunk: Colours
  8174.  Number: 10
  8175.  0x7F 0xBB 0xBC 0xBB 0x00 0xBE 0xBA 0xB8 0xBA 0xBB
  8176. End_Chunk
  8177. ;
  8178. ;-------Object  282-------------------------------------------------------
  8179. ; 
  8180. Chunk: Standard
  8181.  Name:     "FloorUnit[282]"
  8182.  Number:   282
  8183.  Size:     5600 7320 0
  8184.  Position: 400 1500 4000
  8185.  Type:     0
  8186.  Layer:    0
  8187. End_Chunk
  8188. Chunk: Colours
  8189.  Number: 10
  8190.  0x00 0x00 0x00 0xBB 0x00 0x00 0xBA 0xB8 0xBA 0xBB
  8191. End_Chunk
  8192. ;
  8193. ;-------Object   98-------------------------------------------------------
  8194. ; 
  8195. Chunk: Standard
  8196.  Name:     "cupdoor hold"
  8197.  Number:   98
  8198.  Size:     200 5856 4000
  8199.  Position: 200 1500 0
  8200.  Type:     113
  8201.  Layer:    1
  8202. End_Chunk
  8203. Chunk: TexCoords
  8204.  Number: 1
  8205.  Mode:   0
  8206.  SubChunk
  8207.   Facet:     4
  8208.   ImageRef:  1
  8209.   PixScale:  0
  8210.   NumCoords: 4
  8211.     0.00000 0.00000
  8212.     0.00000 1.00000
  8213.     1.00000 1.00000
  8214.     1.00000 0.00000
  8215. End_Chunk
  8216. Chunk: Colours
  8217.  Number: 6
  8218.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  8219. End_Chunk
  8220.  
  8221. Chunk: ImageRef
  8222.  Number: 4
  8223.  Index: 1 Image: 1
  8224.  Index: 2 Image: 2
  8225.  Index: 3 Image: 3
  8226.  Index: 4 Image: 4
  8227. End_Chunk
  8228. Chunk: SCL
  8229. short  dir=1, rep=20, rate=5, irate=5;
  8230.  
  8231.  
  8232.  
  8233. /*
  8234.  
  8235.  
  8236.  
  8237.     dir     determines which side the door is hinged.
  8238.  
  8239.     rep     specifies how many frames the opening sequence is played over.
  8240.  
  8241.     rate    sets how many degrees the door will turn per frame.
  8242.  
  8243.     irate   stores the initial rate.
  8244.  
  8245.  
  8246.  
  8247. */
  8248.  
  8249.  
  8250.  
  8251. resume (1, 1);
  8252.  
  8253. if (activate (me, 0) || activate (child (me), 0) || activate 
  8254.  
  8255.     (sibling (child (me)), 0) || activate (sibling (sibling 
  8256.  
  8257.     (child (me))), 0))
  8258.  
  8259. {
  8260.  
  8261. /*
  8262.  
  8263.  
  8264.  
  8265.         tell parent to visiblise inside of cupboard
  8266.  
  8267.  
  8268.  
  8269. */
  8270.  
  8271.   gvar (0, parent (me))=1;
  8272.  
  8273.   waitfs (3);
  8274.  
  8275. /*
  8276.  
  8277.  
  8278.  
  8279.         open/close door
  8280.  
  8281.  
  8282.  
  8283. */
  8284.  
  8285.  
  8286.  
  8287.   repeat (rep)
  8288.  
  8289.   {
  8290.  
  8291.     yrot (me)+=rate*dir;
  8292.  
  8293.     waitf;
  8294.  
  8295.   }
  8296.  
  8297. /*
  8298.  
  8299.  
  8300.  
  8301.         reverse door direction
  8302.  
  8303.             for next time
  8304.  
  8305.  
  8306.  
  8307. */
  8308.  
  8309.   rate=-rate;
  8310.  
  8311. /*
  8312.  
  8313.  
  8314.  
  8315.         if the door is shut, tell
  8316.  
  8317.         its parent
  8318.  
  8319.  
  8320.  
  8321. */
  8322.  
  8323.   if (rate==irate)
  8324.  
  8325.     gvar (0, parent (me))=0;
  8326.  
  8327.   clrtrig (me, 0);
  8328.  
  8329.   clrtrig (child (me), 0);
  8330.  
  8331.   clrtrig (sibling (child (me)), 0);
  8332.  
  8333.   clrtrig (sibling (sibling (child (me))), 0);
  8334.  
  8335. }
  8336. end
  8337. End_Chunk
  8338. Chunk: Rotations
  8339.  Initial: 0x0000 0x0000 0x0000
  8340.  Centre:  100 2928 3900
  8341. End_Chunk
  8342.  
  8343. Children:
  8344. ;
  8345. ;-------Object  204-------------------------------------------------------
  8346. ; 
  8347. Chunk: Standard
  8348.  Name:     "door1st[204]"
  8349.  Number:   204
  8350.  Size:     200 5856 4000
  8351.  Position: 0 0 0
  8352.  Type:     33
  8353.  Layer:    0
  8354.  OFlags:   r
  8355. End_Chunk
  8356. Chunk: Distancing
  8357.  Visible:   6000
  8358.  Invisible: 6666
  8359.  Replace:   251
  8360. End_Chunk
  8361. ;
  8362. ;-------Object  251-------------------------------------------------------
  8363. ; 
  8364. Chunk: Standard
  8365.  Name:     "door2nd[251]"
  8366.  Number:   251
  8367.  Size:     200 5856 4000
  8368.  Position: 0 0 0
  8369.  Type:     25
  8370.  Layer:    0
  8371.  OFlags:   r
  8372. End_Chunk
  8373. Chunk: Distancing
  8374.  Visible:   8000
  8375.  Invisible: 8888
  8376.  Replace:   252
  8377. End_Chunk
  8378. ;
  8379. ;-------Object  252-------------------------------------------------------
  8380. ; 
  8381. Chunk: Standard
  8382.  Name:     "door3rd[252]"
  8383.  Number:   252
  8384.  Size:     200 5856 4000
  8385.  Position: 0 0 0
  8386.  Type:     71
  8387.  Layer:    0
  8388.  DFlags:   R
  8389.  OFlags:   i
  8390. End_Chunk
  8391.  
  8392. End_Children
  8393. ;
  8394. ;-------Object  766-------------------------------------------------------
  8395. ; 
  8396. Chunk: Standard
  8397.  Name:     "FloorUnit[766]"
  8398.  Number:   766
  8399.  Size:     200 1464 4000
  8400.  Position: 200 7356 0
  8401.  Type:     113
  8402.  Layer:    1
  8403. End_Chunk
  8404. Chunk: TexCoords
  8405.  Number: 1
  8406.  Mode:   0
  8407.  SubChunk
  8408.   Facet:     4
  8409.   ImageRef:  1
  8410.   PixScale:  0
  8411.   NumCoords: 4
  8412.     0.00000 0.00000
  8413.     0.00000 1.00000
  8414.     1.00000 1.00000
  8415.     1.00000 0.00000
  8416. End_Chunk
  8417. Chunk: Colours
  8418.  Number: 6
  8419.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  8420. End_Chunk
  8421.  
  8422. Chunk: ImageRef
  8423.  Number: 4
  8424.  Index: 1 Image: 1
  8425.  Index: 2 Image: 2
  8426.  Index: 3 Image: 3
  8427.  Index: 4 Image: 4
  8428. End_Chunk
  8429.  
  8430. Children:
  8431. ;
  8432. ;-------Object  112-------------------------------------------------------
  8433. ; 
  8434. Chunk: Standard
  8435.  Name:     "FloorUnit[112]"
  8436.  Number:   112
  8437.  Size:     200 1464 4000
  8438.  Position: 0 0 0
  8439.  Type:     74
  8440.  Layer:    0
  8441. End_Chunk
  8442.  
  8443. End_Children
  8444.  
  8445. End_Children
  8446. ;
  8447. ;-------Object   93-------------------------------------------------------
  8448. ; 
  8449. Chunk: Standard
  8450.  Name:     "DrawerLineUnit[93]"
  8451.  Number:   93
  8452.  Size:     6000 8820 6000
  8453.  Position: 5000 0 0
  8454.  Type:     65535
  8455.  Layer:    0
  8456. End_Chunk
  8457. Chunk: SCL
  8458. short  v00;
  8459.  
  8460.  
  8461. end
  8462. End_Chunk
  8463.  
  8464. Children:
  8465. ;
  8466. ;-------Object   94-------------------------------------------------------
  8467. ; 
  8468. Chunk: Standard
  8469.  Name:     "DrawerLineUnit[94]"
  8470.  Number:   94
  8471.  Size:     6000 1500 4900
  8472.  Position: 0 0 0
  8473.  Type:     0
  8474.  Layer:    0
  8475. End_Chunk
  8476. Chunk: Colours
  8477.  Number: 6
  8478.  0x00 0x00 0x00 0xBD 0x00 0x00
  8479. End_Chunk
  8480. ;
  8481. ;-------Object  196-------------------------------------------------------
  8482. ; 
  8483. Chunk: Standard
  8484.  Name:     "DrawerLineUnit[196]"
  8485.  Number:   196
  8486.  Size:     6000 5856 5600
  8487.  Position: 0 1500 0
  8488.  Type:     58
  8489.  Layer:    0
  8490. End_Chunk
  8491. Chunk: SCL
  8492. if (gvar (0, parent (me))!=0)
  8493.  
  8494.   vis (me);
  8495.  
  8496. else
  8497.  
  8498.   invis (me);
  8499.  
  8500.  
  8501. end
  8502. End_Chunk
  8503. Chunk: Colours
  8504.  Number: 10
  8505.  0x7F 0xBB 0xBF 0xBB 0x00 0x00 0xBA 0xB7 0xBD 0x00
  8506. End_Chunk
  8507. ;
  8508. ;-------Object  212-------------------------------------------------------
  8509. ; 
  8510. Chunk: Standard
  8511.  Name:     "door hold[212]"
  8512.  Number:   212
  8513.  Size:     6000 5856 200
  8514.  Position: 0 1500 5600
  8515.  Type:     113
  8516.  Layer:    1
  8517. End_Chunk
  8518. Chunk: TexCoords
  8519.  Number: 1
  8520.  Mode:   0
  8521.  SubChunk
  8522.   Facet:     3
  8523.   ImageRef:  1
  8524.   PixScale:  0
  8525.   NumCoords: 4
  8526.     0.00000 0.00000
  8527.     0.00000 1.00000
  8528.     1.00000 1.00000
  8529.     1.00000 0.00000
  8530. End_Chunk
  8531. Chunk: Colours
  8532.  Number: 6
  8533.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  8534. End_Chunk
  8535.  
  8536. Chunk: ImageRef
  8537.  Number: 4
  8538.  Index: 1 Image: 1
  8539.  Index: 2 Image: 2
  8540.  Index: 3 Image: 3
  8541.  Index: 4 Image: 4
  8542. End_Chunk
  8543. Chunk: SCL
  8544. short  v00=-1, v01=20, v02=5, v03=5;
  8545.  
  8546.  
  8547.  
  8548. resume (1, 1);
  8549.  
  8550. if (activate (me, 0) || activate (child (me), 0) || activate 
  8551.  
  8552.     (sibling (child (me)), 0) || activate (sibling (sibling 
  8553.  
  8554.     (child (me))), 0))
  8555.  
  8556. {
  8557.  
  8558.   gvar (0, parent (me))=1;
  8559.  
  8560.   waitfs (3);
  8561.  
  8562.   repeat (v01)
  8563.  
  8564.   {
  8565.  
  8566.     yrot (me)+=v02*v00;
  8567.  
  8568.     waitf;
  8569.  
  8570.   }
  8571.  
  8572.   v02=-v02;
  8573.  
  8574.   if (v02==v03)
  8575.  
  8576.     gvar (0, parent (me))=0;
  8577.  
  8578.   clrtrig (me, 0);
  8579.  
  8580.   clrtrig (child (me), 0);
  8581.  
  8582.   clrtrig (sibling (child (me)), 0);
  8583.  
  8584.   clrtrig (sibling (sibling (child (me))), 0);
  8585.  
  8586. }
  8587. end
  8588. End_Chunk
  8589. Chunk: Rotations
  8590.  Initial: 0x0000 0x0000 0x0000
  8591.  Centre:  291 2928 0
  8592. End_Chunk
  8593.  
  8594. Children:
  8595. ;
  8596. ;-------Object  213-------------------------------------------------------
  8597. ; 
  8598. Chunk: Standard
  8599.  Name:     "door1st[213]"
  8600.  Number:   213
  8601.  Size:     6000 5856 200
  8602.  Position: 0 0 0
  8603.  Type:     59
  8604.  Layer:    0
  8605.  OFlags:   r
  8606. End_Chunk
  8607. Chunk: Distancing
  8608.  Visible:   6000
  8609.  Invisible: 6375
  8610.  Replace:   214
  8611. End_Chunk
  8612. ;
  8613. ;-------Object  214-------------------------------------------------------
  8614. ; 
  8615. Chunk: Standard
  8616.  Name:     "door2nd[214]"
  8617.  Number:   214
  8618.  Size:     6000 5856 200
  8619.  Position: 0 0 0
  8620.  Type:     23
  8621.  Layer:    0
  8622.  OFlags:   r
  8623. End_Chunk
  8624. Chunk: Distancing
  8625.  Visible:   8000
  8626.  Invisible: 8500
  8627.  Replace:   215
  8628. End_Chunk
  8629. ;
  8630. ;-------Object  215-------------------------------------------------------
  8631. ; 
  8632. Chunk: Standard
  8633.  Name:     "door3rd[215]"
  8634.  Number:   215
  8635.  Size:     6000 5856 200
  8636.  Position: 0 0 0
  8637.  Type:     70
  8638.  Layer:    0
  8639.  DFlags:   R
  8640.  OFlags:   i
  8641. End_Chunk
  8642. ;
  8643. ;-------Object  754-------------------------------------------------------
  8644. ; 
  8645. Chunk: Standard
  8646.  Name:     "door3rd[754]"
  8647.  Number:   754
  8648.  Size:     6000 5856 200
  8649.  Position: 0 0 0
  8650.  Type:     65535
  8651.  Layer:    0
  8652.  DFlags:   R
  8653.  OFlags:   i
  8654. End_Chunk
  8655.  
  8656. End_Children
  8657. ;
  8658. ;-------Object  759-------------------------------------------------------
  8659. ; 
  8660. Chunk: Standard
  8661.  Name:     "DrawerLineUnit[759]"
  8662.  Number:   759
  8663.  Size:     6000 1464 200
  8664.  Position: 0 7356 5600
  8665.  Type:     113
  8666.  Layer:    1
  8667. End_Chunk
  8668. Chunk: TexCoords
  8669.  Number: 1
  8670.  Mode:   0
  8671.  SubChunk
  8672.   Facet:     3
  8673.   ImageRef:  1
  8674.   PixScale:  0
  8675.   NumCoords: 4
  8676.     0.00000 0.00000
  8677.     0.00000 1.00000
  8678.     1.00000 1.00000
  8679.     1.00000 0.00000
  8680. End_Chunk
  8681. Chunk: Colours
  8682.  Number: 6
  8683.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  8684. End_Chunk
  8685.  
  8686. Chunk: ImageRef
  8687.  Number: 4
  8688.  Index: 1 Image: 1
  8689.  Index: 2 Image: 2
  8690.  Index: 3 Image: 3
  8691.  Index: 4 Image: 4
  8692. End_Chunk
  8693.  
  8694. Children:
  8695. ;
  8696. ;-------Object   96-------------------------------------------------------
  8697. ; 
  8698. Chunk: Standard
  8699.  Name:     "DrawerLineUnit[96]"
  8700.  Number:   96
  8701.  Size:     6000 1464 200
  8702.  Position: 0 0 0
  8703.  Type:     22
  8704.  Layer:    0
  8705. End_Chunk
  8706.  
  8707. End_Children
  8708.  
  8709. End_Children
  8710. ;
  8711. ;-------Object   52-------------------------------------------------------
  8712. ; 
  8713. Chunk: Standard
  8714.  Name:     "DrawerLineUnit[52]"
  8715.  Number:   52
  8716.  Size:     4000 8820 6000
  8717.  Position: 11000 0 0
  8718.  Type:     65535
  8719.  Layer:    0
  8720. End_Chunk
  8721. Chunk: SCL
  8722. short  v00;
  8723.  
  8724.  
  8725. end
  8726. End_Chunk
  8727.  
  8728. Children:
  8729. ;
  8730. ;-------Object   97-------------------------------------------------------
  8731. ; 
  8732. Chunk: Standard
  8733.  Name:     "DrawerLineUnit[97]"
  8734.  Number:   97
  8735.  Size:     4000 1500 4900
  8736.  Position: 0 0 0
  8737.  Type:     0
  8738.  Layer:    0
  8739. End_Chunk
  8740. Chunk: Colours
  8741.  Number: 6
  8742.  0x00 0x00 0x00 0xBD 0x00 0x00
  8743. End_Chunk
  8744. ;
  8745. ;-------Object  197-------------------------------------------------------
  8746. ; 
  8747. Chunk: Standard
  8748.  Name:     "DrawerLineUnit[197]"
  8749.  Number:   197
  8750.  Size:     4000 5856 5600
  8751.  Position: 0 1500 0
  8752.  Type:     58
  8753.  Layer:    0
  8754. End_Chunk
  8755. Chunk: SCL
  8756. if (gvar (0, parent (me))!=0)
  8757.  
  8758.   vis (me);
  8759.  
  8760. else
  8761.  
  8762.   invis (me);
  8763.  
  8764.  
  8765. end
  8766. End_Chunk
  8767. Chunk: Colours
  8768.  Number: 10
  8769.  0x7F 0xBB 0xBF 0xBB 0x00 0x00 0xBA 0xB7 0xBD 0x00
  8770. End_Chunk
  8771. ;
  8772. ;-------Object  222-------------------------------------------------------
  8773. ; 
  8774. Chunk: Standard
  8775.  Name:     "door hold[222]"
  8776.  Number:   222
  8777.  Size:     4000 5856 200
  8778.  Position: 0 1500 5600
  8779.  Type:     113
  8780.  Layer:    1
  8781. End_Chunk
  8782. Chunk: TexCoords
  8783.  Number: 1
  8784.  Mode:   0
  8785.  SubChunk
  8786.   Facet:     3
  8787.   ImageRef:  1
  8788.   PixScale:  0
  8789.   NumCoords: 4
  8790.     0.00000 0.00000
  8791.     0.00000 1.00000
  8792.     1.00000 1.00000
  8793.     1.00000 0.00000
  8794. End_Chunk
  8795. Chunk: Colours
  8796.  Number: 6
  8797.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  8798. End_Chunk
  8799.  
  8800. Chunk: ImageRef
  8801.  Number: 4
  8802.  Index: 1 Image: 1
  8803.  Index: 2 Image: 2
  8804.  Index: 3 Image: 3
  8805.  Index: 4 Image: 4
  8806. End_Chunk
  8807. Chunk: SCL
  8808. short  v00=-1, v01=20, v02=5, v03=5;
  8809.  
  8810.  
  8811.  
  8812. resume (1, 1);
  8813.  
  8814. if (activate (me, 0) || activate (child (me), 0) || activate 
  8815.  
  8816.     (sibling (child (me)), 0) || activate (sibling (sibling 
  8817.  
  8818.     (child (me))), 0))
  8819.  
  8820. {
  8821.  
  8822.   gvar (0, parent (me))=1;
  8823.  
  8824.   waitfs (3);
  8825.  
  8826.   repeat (v01)
  8827.  
  8828.   {
  8829.  
  8830.     yrot (me)+=v02*v00;
  8831.  
  8832.     waitf;
  8833.  
  8834.   }
  8835.  
  8836.   v02=-v02;
  8837.  
  8838.   if (v02==v03)
  8839.  
  8840.     gvar (0, parent (me))=0;
  8841.  
  8842.   clrtrig (me, 0);
  8843.  
  8844.   clrtrig (child (me), 0);
  8845.  
  8846.   clrtrig (sibling (child (me)), 0);
  8847.  
  8848.   clrtrig (sibling (sibling (child (me))), 0);
  8849.  
  8850. }
  8851. end
  8852. End_Chunk
  8853. Chunk: Rotations
  8854.  Initial: 0x0000 0x0000 0x0000
  8855.  Centre:  194 2928 0
  8856. End_Chunk
  8857.  
  8858. Children:
  8859. ;
  8860. ;-------Object  223-------------------------------------------------------
  8861. ; 
  8862. Chunk: Standard
  8863.  Name:     "door1st[223]"
  8864.  Number:   223
  8865.  Size:     4000 5856 200
  8866.  Position: 0 0 0
  8867.  Type:     59
  8868.  Layer:    0
  8869.  OFlags:   r
  8870. End_Chunk
  8871. Chunk: Distancing
  8872.  Visible:   4800
  8873.  Invisible: 6375
  8874.  Replace:   224
  8875. End_Chunk
  8876. ;
  8877. ;-------Object  224-------------------------------------------------------
  8878. ; 
  8879. Chunk: Standard
  8880.  Name:     "door2nd[224]"
  8881.  Number:   224
  8882.  Size:     4000 5856 200
  8883.  Position: 0 0 0
  8884.  Type:     23
  8885.  Layer:    0
  8886.  OFlags:   r
  8887. End_Chunk
  8888. Chunk: Distancing
  8889.  Visible:   6400
  8890.  Invisible: 8500
  8891.  Replace:   226
  8892. End_Chunk
  8893. ;
  8894. ;-------Object  226-------------------------------------------------------
  8895. ; 
  8896. Chunk: Standard
  8897.  Name:     "door3rd[226]"
  8898.  Number:   226
  8899.  Size:     4000 5856 200
  8900.  Position: 0 0 0
  8901.  Type:     70
  8902.  Layer:    0
  8903.  DFlags:   R
  8904.  OFlags:   i
  8905. End_Chunk
  8906.  
  8907. End_Children
  8908. ;
  8909. ;-------Object  760-------------------------------------------------------
  8910. ; 
  8911. Chunk: Standard
  8912.  Name:     "DrawerLineUnit[760]"
  8913.  Number:   760
  8914.  Size:     4000 1464 200
  8915.  Position: 0 7356 5600
  8916.  Type:     113
  8917.  Layer:    1
  8918. End_Chunk
  8919. Chunk: TexCoords
  8920.  Number: 1
  8921.  Mode:   0
  8922.  SubChunk
  8923.   Facet:     3
  8924.   ImageRef:  1
  8925.   PixScale:  0
  8926.   NumCoords: 4
  8927.     0.00000 0.00000
  8928.     0.00000 1.00000
  8929.     1.00000 1.00000
  8930.     1.00000 0.00000
  8931. End_Chunk
  8932. Chunk: Colours
  8933.  Number: 6
  8934.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  8935. End_Chunk
  8936.  
  8937. Chunk: ImageRef
  8938.  Number: 4
  8939.  Index: 1 Image: 1
  8940.  Index: 2 Image: 2
  8941.  Index: 3 Image: 3
  8942.  Index: 4 Image: 4
  8943. End_Chunk
  8944.  
  8945. Children:
  8946. ;
  8947. ;-------Object   99-------------------------------------------------------
  8948. ; 
  8949. Chunk: Standard
  8950.  Name:     "DrawerLineUnit[99]"
  8951.  Number:   99
  8952.  Size:     4000 1464 200
  8953.  Position: 0 0 0
  8954.  Type:     22
  8955.  Layer:    0
  8956. End_Chunk
  8957.  
  8958. End_Children
  8959.  
  8960. End_Children
  8961.  
  8962. End_Children
  8963. ;
  8964. ;-------Object   60-------------------------------------------------------
  8965. ; 
  8966. Chunk: Standard
  8967.  Name:     "Worktop[60]"
  8968.  Number:   60
  8969.  Size:     18350 280 6000
  8970.  Position: 0 8820 0
  8971.  Type:     20
  8972.  Layer:    0
  8973. End_Chunk
  8974. Chunk: Colours
  8975.  Number: 9
  8976.  0x62 0x61 0x60 0x61 0x62 0x63 0x67 0x00 0x67
  8977. End_Chunk
  8978. ;
  8979. ;-------Object  110-------------------------------------------------------
  8980. ; 
  8981. Chunk: Standard
  8982.  Name:     "Worktop[110]"
  8983.  Number:   110
  8984.  Size:     6000 280 6000
  8985.  Position: 18350 8820 0
  8986.  Type:     0
  8987.  Layer:    0
  8988. End_Chunk
  8989. Chunk: Colours
  8990.  Number: 6
  8991.  0x00 0x00 0x14 0x60 0x62 0x00
  8992. End_Chunk
  8993. ;
  8994. ;-------Object  111-------------------------------------------------------
  8995. ; 
  8996. Chunk: Standard
  8997.  Name:     "Worktop[111]"
  8998.  Number:   111
  8999.  Size:     6000 280 7350
  9000.  Position: 18350 8820 6000
  9001.  Type:     16
  9002.  Layer:    0
  9003. End_Chunk
  9004. Chunk: Colours
  9005.  Number: 9
  9006.  0x62 0x61 0x60 0x61 0x62 0x63 0x00 0x65 0x67
  9007. End_Chunk
  9008.  
  9009. End_Children
  9010. ;
  9011. ;-------Object  399-------------------------------------------------------
  9012. ; 
  9013. Chunk: Standard
  9014.  Name:     "top-corner"
  9015.  Number:   399
  9016.  Size:     6350 6800 13950
  9017.  Position: 24700 14920 0
  9018.  Type:     65535
  9019.  Layer:    0
  9020. End_Chunk
  9021.  
  9022. Children:
  9023. ;
  9024. ;-------Object  150-------------------------------------------------------
  9025. ; 
  9026. Chunk: Standard
  9027.  Name:     "CornerWallUnit[150]"
  9028.  Number:   150
  9029.  Size:     6350 6000 6350
  9030.  Position: 0 0 0
  9031.  Type:     65535
  9032.  Layer:    0
  9033. End_Chunk
  9034.  
  9035. Children:
  9036. ;
  9037. ;-------Object   56-------------------------------------------------------
  9038. ; 
  9039. Chunk: Standard
  9040.  Name:     "CornerWallUnit"
  9041.  Number:   56
  9042.  Size:     6350 5600 6350
  9043.  Position: 0 400 0
  9044.  Type:     43
  9045.  Layer:    0
  9046. End_Chunk
  9047. Chunk: SCL
  9048. short  v00;
  9049.  
  9050.  
  9051. end
  9052. End_Chunk
  9053. Chunk: Colours
  9054.  Number: 14
  9055.  0x8B 0xBB 0xBE 0xBC 0xBA 0xBA 0xBC 0xBC 0xB8 0xBE 0x73 0x73 0x73 0x8F
  9056. End_Chunk
  9057.  
  9058. Children:
  9059. ;
  9060. ;-------Object   88-------------------------------------------------------
  9061. ; 
  9062. Chunk: Standard
  9063.  Name:     "door hold[88]"
  9064.  Number:   88
  9065.  Size:     200 5600 4600
  9066.  Position: 2800 0 1800
  9067.  Type:     113
  9068.  Layer:    1
  9069. End_Chunk
  9070. Chunk: TexCoords
  9071.  Number: 1
  9072.  Mode:   0
  9073.  SubChunk
  9074.   Facet:     4
  9075.   ImageRef:  1
  9076.   PixScale:  0
  9077.   NumCoords: 4
  9078.     0.00000 0.00000
  9079.     0.00000 1.00000
  9080.     1.00000 1.00000
  9081.     1.00000 0.00000
  9082. End_Chunk
  9083. Chunk: Colours
  9084.  Number: 6
  9085.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  9086. End_Chunk
  9087.  
  9088. Chunk: ImageRef
  9089.  Number: 4
  9090.  Index: 1 Image: 1
  9091.  Index: 2 Image: 2
  9092.  Index: 3 Image: 3
  9093.  Index: 4 Image: 4
  9094. End_Chunk
  9095. Chunk: SCL
  9096. short  v00=1, v01=16, v02=5, v03=5;
  9097.  
  9098.  
  9099.  
  9100. resume (1, 1);
  9101.  
  9102. if (activate (me, 0) || activate (child (me), 0) || activate 
  9103.  
  9104.     (sibling (child (me)), 0) || activate (sibling (sibling 
  9105.  
  9106.     (child (me))), 0))
  9107.  
  9108. {
  9109.  
  9110.   gvar (0, parent (me))=1;
  9111.  
  9112.   waitfs (3);
  9113.  
  9114.   repeat (v01)
  9115.  
  9116.   {
  9117.  
  9118.     yrot (me)+=v02*v00;
  9119.  
  9120.     waitf;
  9121.  
  9122.   }
  9123.  
  9124.   v02=-v02;
  9125.  
  9126.   if (v02==v03)
  9127.  
  9128.     gvar (0, parent (me))=0;
  9129.  
  9130.   clrtrig (me, 0);
  9131.  
  9132.   clrtrig (child (me), 0);
  9133.  
  9134.   clrtrig (sibling (child (me)), 0);
  9135.  
  9136.   clrtrig (sibling (sibling (child (me))), 0);
  9137.  
  9138. }
  9139. end
  9140. End_Chunk
  9141. Chunk: Rotations
  9142.  Initial: 0x0000 0x2000 0x0000
  9143.  Centre:  100 2800 4485
  9144. End_Chunk
  9145.  
  9146. Children:
  9147. ;
  9148. ;-------Object  255-------------------------------------------------------
  9149. ; 
  9150. Chunk: Standard
  9151.  Name:     "door1st[255]"
  9152.  Number:   255
  9153.  Size:     200 5600 4600
  9154.  Position: 0 0 0
  9155.  Type:     33
  9156.  Layer:    0
  9157.  OFlags:   r
  9158. End_Chunk
  9159. Chunk: Distancing
  9160.  Visible:   6000
  9161.  Invisible: 6374
  9162.  Replace:   256
  9163. End_Chunk
  9164. ;
  9165. ;-------Object  256-------------------------------------------------------
  9166. ; 
  9167. Chunk: Standard
  9168.  Name:     "door2nd[256]"
  9169.  Number:   256
  9170.  Size:     200 5600 4600
  9171.  Position: 0 0 0
  9172.  Type:     25
  9173.  Layer:    0
  9174.  OFlags:   r
  9175. End_Chunk
  9176. Chunk: Distancing
  9177.  Visible:   8000
  9178.  Invisible: 8499
  9179.  Replace:   257
  9180. End_Chunk
  9181. ;
  9182. ;-------Object  257-------------------------------------------------------
  9183. ; 
  9184. Chunk: Standard
  9185.  Name:     "door3rd[257]"
  9186.  Number:   257
  9187.  Size:     200 5600 4600
  9188.  Position: 0 0 0
  9189.  Type:     71
  9190.  Layer:    0
  9191.  DFlags:   R
  9192.  OFlags:   i
  9193. End_Chunk
  9194.  
  9195. End_Children
  9196.  
  9197. End_Children
  9198. ;
  9199. ;-------Object  152-------------------------------------------------------
  9200. ; 
  9201. Chunk: Standard
  9202.  Name:     "CornerWallUnit[152]"
  9203.  Number:   152
  9204.  Size:     6350 400 6350
  9205.  Position: 0 0 0
  9206.  Type:     44
  9207.  Layer:    0
  9208. End_Chunk
  9209. Chunk: Colours
  9210.  Number: 14
  9211.  0xBE 0xBB 0x8B 0x8C 0xBC 0x88 0x88 0x88 0x88 0x73 0x73 0x73 0x73 0x8F
  9212. End_Chunk
  9213.  
  9214. End_Children
  9215. ;
  9216. ;-------Object  148-------------------------------------------------------
  9217. ; 
  9218. Chunk: Standard
  9219.  Name:     "CornerWallUnit[148]"
  9220.  Number:   148
  9221.  Size:     6350 800 6350
  9222.  Position: 0 6000 0
  9223.  Type:     42
  9224.  Layer:    0
  9225. End_Chunk
  9226. Chunk: Colours
  9227.  Number: 9
  9228.  0x10 0x11 0xB9 0x10 0x11 0xBA 0xB9 0xBA 0xB8
  9229. End_Chunk
  9230. ;
  9231. ;-------Object  101-------------------------------------------------------
  9232. ; 
  9233. Chunk: Standard
  9234.  Name:     "EndShelfUnit[101]"
  9235.  Number:   101
  9236.  Size:     3000 6000 3000
  9237.  Position: 3350 0 10350
  9238.  Type:     65535
  9239.  Layer:    0
  9240. End_Chunk
  9241.  
  9242. Children:
  9243. ;
  9244. ;-------Object  133-------------------------------------------------------
  9245. ; 
  9246. Chunk: Standard
  9247.  Name:     "FloorEndUnit[133]"
  9248.  Number:   133
  9249.  Size:     2600 4700 200
  9250.  Position: 200 400 0
  9251.  Type:     0
  9252.  Layer:    0
  9253. End_Chunk
  9254. Chunk: Colours
  9255.  Number: 6
  9256.  0xBB 0x00 0x00 0xB9 0x00 0x00
  9257. End_Chunk
  9258. ;
  9259. ;-------Object  132-------------------------------------------------------
  9260. ; 
  9261. Chunk: Standard
  9262.  Name:     "FloorEndUnit[132]"
  9263.  Number:   132
  9264.  Size:     200 4700 2800
  9265.  Position: 2800 400 0
  9266.  Type:     0
  9267.  Layer:    0
  9268. End_Chunk
  9269. Chunk: Colours
  9270.  Number: 6
  9271.  0xBA 0x00 0x00 0xB7 0x00 0x00
  9272. End_Chunk
  9273. ;
  9274. ;-------Object  131-------------------------------------------------------
  9275. ; 
  9276. Chunk: Standard
  9277.  Name:     "FloorEndUnit[131]"
  9278.  Number:   131
  9279.  Size:     3000 900 3000
  9280.  Position: 0 5100 0
  9281.  Type:     34
  9282.  Layer:    0
  9283. End_Chunk
  9284. Chunk: Colours
  9285.  Number: 13
  9286.  0xBB 0xBA 0xBA 0xBB 0xB9 0xBA 0xBA 0xBD 0xBB 0xBB 0xBC 0xBC 0xBC
  9287. End_Chunk
  9288. ;
  9289. ;-------Object  166-------------------------------------------------------
  9290. ; 
  9291. Chunk: Standard
  9292.  Name:     "FloorEndUnit[166]"
  9293.  Number:   166
  9294.  Size:     400 2200 400
  9295.  Position: 200 600 2400
  9296.  Type:     65535
  9297.  Layer:    0
  9298. End_Chunk
  9299.  
  9300. Children:
  9301. ;
  9302. ;-------Object  130-------------------------------------------------------
  9303. ; 
  9304. Chunk: Standard
  9305.  Name:     "FloorEndUnit[130]"
  9306.  Number:   130
  9307.  Size:     400 900 400
  9308.  Position: 0 1300 0
  9309.  Type:     28
  9310.  Layer:    0
  9311.  OFlags:   r
  9312. End_Chunk
  9313. Chunk: Distancing
  9314.  Visible:   2000
  9315.  Invisible: 2125
  9316.  Replace:   217
  9317. End_Chunk
  9318. Chunk: Colours
  9319.  Number: 102
  9320.  0x87 0x86 0x85 0x82 0x83 0x84 0xB9 0xBA 0xB9 0xBA 0xBB 0xBA 0xBB 0xBA 0xBB 0xBC
  9321.  0xBB 0xBC 0xBB 0xBC 0xBD 0xBC 0xBD 0xBC 0xBD 0xBE 0xBD 0xBE 0xBD 0xBE 0xBF 0xBC
  9322.  0xBD 0xBC 0xBD 0xBE 0xB8 0xB9 0xB8 0xB9 0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xB6 0xB7
  9323.  0xB6 0xB7 0xB8 0xB5 0xB6 0xB5 0xB6 0xB7 0xB6 0xB7 0xB6 0xB7 0xB8 0xBB 0xBC 0xBB
  9324.  0xBC 0xBD 0xBA 0xBB 0xBA 0xBB 0xBC 0xB9 0xBA 0xB9 0xBA 0xBB 0xB8 0xB9 0xB8 0xB9
  9325.  0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xBA 0xBB 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  9326.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  9327. End_Chunk
  9328. ;
  9329. ;-------Object  217-------------------------------------------------------
  9330. ; 
  9331. Chunk: Standard
  9332.  Name:     "FloorEndUnit[217]"
  9333.  Number:   217
  9334.  Size:     400 900 400
  9335.  Position: 0 1300 0
  9336.  Type:     65
  9337.  Layer:    0
  9338.  DFlags:   R
  9339.  OFlags:   i
  9340. End_Chunk
  9341. Chunk: Colours
  9342.  Number: 102
  9343.  0xBC 0xBA 0xB7 0xB9 0xBB 0xBD 0xB9 0xBA 0xB8 0xB5 0xB9 0xBB 0xBC 0xB7 0xB9 0xB6
  9344.  0xB7 0xB8 0xBB 0xBC 0xB7 0xBC 0xBD 0xBB 0xBA 0xBA 0xB5 0xB6 0xBC 0xBD 0xBC 0xBB
  9345.  0xBC 0xBB 0xBC 0xBA 0xB8 0xB9 0xB9 0xBB 0xBD 0xB9 0xBE 0xBD 0xB8 0xB9 0xBB 0xB7
  9346.  0xB6 0xB7 0xB8 0xB5 0xB6 0xB5 0xB6 0xB7 0xB6 0xB7 0xB6 0xB7 0xB8 0xBB 0xBC 0xBB
  9347.  0xBC 0xBD 0xBA 0xBB 0xBA 0xBB 0xBC 0xB9 0xBA 0xB9 0xBA 0xBB 0xB8 0xB9 0xB8 0xB9
  9348.  0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xBF 0xBE 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  9349.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  9350. End_Chunk
  9351. ;
  9352. ;-------Object  128-------------------------------------------------------
  9353. ; 
  9354. Chunk: Standard
  9355.  Name:     "FloorEndUnit[128]"
  9356.  Number:   128
  9357.  Size:     400 1300 400
  9358.  Position: 0 0 0
  9359.  Type:     29
  9360.  Layer:    0
  9361.  OFlags:   r
  9362. End_Chunk
  9363. Chunk: Distancing
  9364.  Visible:   2000
  9365.  Invisible: 2125
  9366.  Replace:   218
  9367. End_Chunk
  9368. Chunk: Colours
  9369.  Number: 102
  9370.  0x87 0x86 0x85 0x82 0x83 0x84 0xB9 0xBA 0xBB 0xBA 0xB9 0xBA 0xBB 0xBC 0xBB 0xBA
  9371.  0xBB 0xBC 0xBD 0xBC 0xBB 0xBC 0xBD 0xBE 0xBD 0xBC 0xBD 0xBE 0xBF 0xBE 0xBD 0xBC
  9372.  0xBD 0xBE 0xBD 0xBC 0xB8 0xB9 0xBA 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xB6 0xB7
  9373.  0xB8 0xB7 0xB6 0xB5 0xB6 0xB7 0xB6 0xB5 0xB6 0xB7 0xB8 0xB7 0xB6 0xBB 0xBC 0xBD
  9374.  0xBC 0xBB 0xBA 0xBB 0xBC 0xBB 0xBA 0xB9 0xBA 0xBB 0xBA 0xB9 0xB8 0xB9 0xBA 0xB9
  9375.  0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xBA 0xBB 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  9376.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  9377. End_Chunk
  9378. ;
  9379. ;-------Object  218-------------------------------------------------------
  9380. ; 
  9381. Chunk: Standard
  9382.  Name:     "FloorEndUnit[218]"
  9383.  Number:   218
  9384.  Size:     400 1300 400
  9385.  Position: 0 0 0
  9386.  Type:     66
  9387.  Layer:    0
  9388.  DFlags:   R
  9389.  OFlags:   i
  9390. End_Chunk
  9391. Chunk: Colours
  9392.  Number: 102
  9393.  0xB8 0xB6 0xB7 0xBA 0xBB 0xBC 0xB9 0xBA 0xB8 0xBA 0xBB 0xBB 0xBA 0xBB 0xBC 0xBA
  9394.  0xB7 0xBD 0xBE 0xBD 0xB9 0xB9 0xBD 0xBC 0xBC 0xB7 0xBB 0xBC 0xBD 0xBB 0xB9 0xBC
  9395.  0xB8 0xB6 0xB8 0xBA 0xBB 0xBC 0xBB 0xBA 0xBC 0xBA 0xB8 0xB9 0xBA 0xBC 0xBE 0xBE
  9396.  0xB8 0xB7 0xB6 0xB5 0xB6 0xB7 0xB6 0xB5 0xB6 0xB7 0xB8 0xB7 0xB6 0xBB 0xBC 0xBD
  9397.  0xBC 0xBB 0xBA 0xBB 0xBC 0xBB 0xBA 0xB9 0xBA 0xBB 0xBA 0xB9 0xB8 0xB9 0xBA 0xB9
  9398.  0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xBA 0xBB 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  9399.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  9400. End_Chunk
  9401.  
  9402. End_Children
  9403. ;
  9404. ;-------Object  167-------------------------------------------------------
  9405. ; 
  9406. Chunk: Standard
  9407.  Name:     "FloorEndUnit[167]"
  9408.  Number:   167
  9409.  Size:     400 2100 400
  9410.  Position: 200 3000 2400
  9411.  Type:     65535
  9412.  Layer:    0
  9413. End_Chunk
  9414.  
  9415. Children:
  9416. ;
  9417. ;-------Object  129-------------------------------------------------------
  9418. ; 
  9419. Chunk: Standard
  9420.  Name:     "FloorEndUnit[129]"
  9421.  Number:   129
  9422.  Size:     400 1200 400
  9423.  Position: 0 900 0
  9424.  Type:     28
  9425.  Layer:    0
  9426.  OFlags:   r
  9427. End_Chunk
  9428. Chunk: Distancing
  9429.  Visible:   2000
  9430.  Invisible: 2125
  9431.  Replace:   220
  9432. End_Chunk
  9433. Chunk: Colours
  9434.  Number: 102
  9435.  0x87 0x86 0x85 0x82 0x83 0x84 0xB9 0xBA 0xB9 0xBA 0xBB 0xBA 0xBB 0xBA 0xBB 0xBC
  9436.  0xBB 0xBC 0xBB 0xBC 0xBD 0xBC 0xBD 0xBC 0xBD 0xBE 0xBD 0xBE 0xBD 0xBE 0xBF 0xBC
  9437.  0xBD 0xBC 0xBD 0xBE 0xB8 0xB9 0xB8 0xB9 0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xB6 0xB7
  9438.  0xB6 0xB7 0xB8 0xB5 0xB6 0xB5 0xB6 0xB7 0xB6 0xB7 0xB6 0xB7 0xB8 0xBB 0xBC 0xBB
  9439.  0xBC 0xBD 0xBA 0xBB 0xBA 0xBB 0xBC 0xB9 0xBA 0xB9 0xBA 0xBB 0xB8 0xB9 0xB8 0xB9
  9440.  0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xBA 0xBB 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  9441.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  9442. End_Chunk
  9443. ;
  9444. ;-------Object  220-------------------------------------------------------
  9445. ; 
  9446. Chunk: Standard
  9447.  Name:     "FloorEndUnit[220]"
  9448.  Number:   220
  9449.  Size:     400 1200 400
  9450.  Position: 0 900 0
  9451.  Type:     65
  9452.  Layer:    0
  9453.  DFlags:   R
  9454.  OFlags:   i
  9455. End_Chunk
  9456. Chunk: Colours
  9457.  Number: 88
  9458.  0xBC 0xBA 0xB7 0xB9 0xBB 0xBD 0xB9 0xBA 0xB8 0xB5 0xB9 0xBB 0xBC 0xB7 0xB9 0xB6
  9459.  0xB7 0xB8 0xBB 0xBC 0xB7 0xBC 0xBD 0xBB 0xBA 0xBA 0xB5 0xB6 0xBC 0xBD 0xBC 0xBB
  9460.  0xBC 0xBB 0xBC 0xBA 0xB8 0xB9 0xB9 0xBB 0xBD 0xB9 0xBE 0xBD 0xB8 0xB9 0xBB 0xB7
  9461.  0xB6 0xB7 0xB8 0xB5 0xB6 0xB5 0xB6 0xB7 0xB6 0xB7 0xB6 0xB7 0xB8 0xBB 0xBC 0xBB
  9462.  0xBC 0xBD 0xBA 0xBB 0xBA 0xBB 0xBC 0xB9 0xBA 0xB9 0xBA 0xBB 0xB8 0xB9 0xB8 0xB9
  9463.  0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xBF 0xBE
  9464. End_Chunk
  9465. ;
  9466. ;-------Object  127-------------------------------------------------------
  9467. ; 
  9468. Chunk: Standard
  9469.  Name:     "FloorEndUnit[127]"
  9470.  Number:   127
  9471.  Size:     400 900 400
  9472.  Position: 0 0 0
  9473.  Type:     29
  9474.  Layer:    0
  9475.  OFlags:   r
  9476. End_Chunk
  9477. Chunk: Distancing
  9478.  Visible:   2000
  9479.  Invisible: 2125
  9480.  Replace:   219
  9481. End_Chunk
  9482. Chunk: Colours
  9483.  Number: 102
  9484.  0x87 0x86 0x85 0x82 0x83 0x84 0xB9 0xBA 0xBB 0xBA 0xB9 0xBA 0xBB 0xBC 0xBB 0xBA
  9485.  0xBB 0xBC 0xBD 0xBC 0xBB 0xBC 0xBD 0xBE 0xBD 0xBC 0xBD 0xBE 0xBF 0xBE 0xBD 0xBC
  9486.  0xBD 0xBE 0xBD 0xBC 0xB8 0xB9 0xBA 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xB6 0xB7
  9487.  0xB8 0xB7 0xB6 0xB5 0xB6 0xB7 0xB6 0xB5 0xB6 0xB7 0xB8 0xB7 0xB6 0xBB 0xBC 0xBD
  9488.  0xBC 0xBB 0xBA 0xBB 0xBC 0xBB 0xBA 0xB9 0xBA 0xBB 0xBA 0xB9 0xB8 0xB9 0xBA 0xB9
  9489.  0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xBA 0xBB 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  9490.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  9491. End_Chunk
  9492. ;
  9493. ;-------Object  219-------------------------------------------------------
  9494. ; 
  9495. Chunk: Standard
  9496.  Name:     "FloorEndUnit[219]"
  9497.  Number:   219
  9498.  Size:     400 900 400
  9499.  Position: 0 0 0
  9500.  Type:     66
  9501.  Layer:    0
  9502.  DFlags:   R
  9503.  OFlags:   i
  9504. End_Chunk
  9505. Chunk: Colours
  9506.  Number: 48
  9507.  0xB8 0xB6 0xB7 0xBA 0xBB 0xBC 0xB9 0xBA 0xB8 0xBA 0xBB 0xBB 0xBA 0xBB 0xBC 0xBA
  9508.  0xB7 0xBD 0xBE 0xBD 0xB9 0xB9 0xBD 0xBC 0xBC 0xB7 0xBB 0xBC 0xBD 0xBB 0xB9 0xBC
  9509.  0xB8 0xB6 0xB8 0xBA 0xBB 0xBC 0xBB 0xBA 0xBC 0xBA 0xB8 0xB9 0xBA 0xBC 0xBE 0xBE
  9510. End_Chunk
  9511.  
  9512. End_Children
  9513. ;
  9514. ;-------Object  126-------------------------------------------------------
  9515. ; 
  9516. Chunk: Standard
  9517.  Name:     "FloorEndUnit[126]"
  9518.  Number:   126
  9519.  Size:     2600 200 2600
  9520.  Position: 200 2800 200
  9521.  Type:     32
  9522.  Layer:    0
  9523. End_Chunk
  9524. Chunk: Colours
  9525.  Number: 7
  9526.  0xB6 0xBB 0xB8 0xB9 0xBC 0xBF 0xB7
  9527. End_Chunk
  9528. ;
  9529. ;-------Object  125-------------------------------------------------------
  9530. ; 
  9531. Chunk: Standard
  9532.  Name:     "FloorEndUnit[125]"
  9533.  Number:   125
  9534.  Size:     2600 200 2600
  9535.  Position: 200 400 200
  9536.  Type:     32
  9537.  Layer:    0
  9538. End_Chunk
  9539. Chunk: Colours
  9540.  Number: 7
  9541.  0xB6 0xBB 0xB8 0xB9 0xBF 0xBF 0xB7
  9542. End_Chunk
  9543. ;
  9544. ;-------Object  124-------------------------------------------------------
  9545. ; 
  9546. Chunk: Standard
  9547.  Name:     "FloorEndUnit[124]"
  9548.  Number:   124
  9549.  Size:     2600 400 2600
  9550.  Position: 400 0 0
  9551.  Type:     0
  9552.  Layer:    0
  9553. End_Chunk
  9554. Chunk: Colours
  9555.  Number: 6
  9556.  0xBC 0x00 0x00 0xB8 0x00 0xBE
  9557. End_Chunk
  9558.  
  9559. End_Children
  9560. ;
  9561. ;-------Object  103-------------------------------------------------------
  9562. ; 
  9563. Chunk: Standard
  9564.  Name:     "EndShelfUnit[103]"
  9565.  Number:   103
  9566.  Size:     3000 6000 4000
  9567.  Position: 3350 0 6350
  9568.  Type:     65535
  9569.  Layer:    0
  9570. End_Chunk
  9571. Chunk: SCL
  9572. short  v00;
  9573.  
  9574.  
  9575. end
  9576. End_Chunk
  9577.  
  9578. Children:
  9579. ;
  9580. ;-------Object  104-------------------------------------------------------
  9581. ; 
  9582. Chunk: Standard
  9583.  Name:     "EndShelfUnit[104]"
  9584.  Number:   104
  9585.  Size:     2600 400 4000
  9586.  Position: 400 0 0
  9587.  Type:     0
  9588.  Layer:    0
  9589. End_Chunk
  9590. Chunk: Colours
  9591.  Number: 6
  9592.  0xBC 0x00 0x00 0xB9 0x00 0xBE
  9593. End_Chunk
  9594. ;
  9595. ;-------Object   58-------------------------------------------------------
  9596. ; 
  9597. Chunk: Standard
  9598.  Name:     "EndShelfUnit[58]"
  9599.  Number:   58
  9600.  Size:     2800 5600 4000
  9601.  Position: 200 400 0
  9602.  Type:     41
  9603.  Layer:    0
  9604. End_Chunk
  9605. Chunk: SCL
  9606. if (yrot (#258)!=0)
  9607.  
  9608.   vis (me);
  9609.  
  9610. else
  9611.  
  9612.   invis (me);
  9613.  
  9614.  
  9615. end
  9616. End_Chunk
  9617. Chunk: Colours
  9618.  Number: 9
  9619.  0x00 0xBB 0xBC 0xBB 0xBC 0xBE 0xBA 0xB8 0xBA
  9620. End_Chunk
  9621. ;
  9622. ;-------Object  258-------------------------------------------------------
  9623. ; 
  9624. Chunk: Standard
  9625.  Name:     "door hold[258]"
  9626.  Number:   258
  9627.  Size:     200 5600 4000
  9628.  Position: 0 400 0
  9629.  Type:     113
  9630.  Layer:    1
  9631. End_Chunk
  9632. Chunk: TexCoords
  9633.  Number: 1
  9634.  Mode:   0
  9635.  SubChunk
  9636.   Facet:     4
  9637.   ImageRef:  1
  9638.   PixScale:  0
  9639.   NumCoords: 4
  9640.     0.00000 0.00000
  9641.     0.00000 1.00000
  9642.     1.00000 1.00000
  9643.     1.00000 0.00000
  9644. End_Chunk
  9645. Chunk: Colours
  9646.  Number: 6
  9647.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  9648. End_Chunk
  9649.  
  9650. Chunk: ImageRef
  9651.  Number: 4
  9652.  Index: 1 Image: 1
  9653.  Index: 2 Image: 2
  9654.  Index: 3 Image: 3
  9655.  Index: 4 Image: 4
  9656. End_Chunk
  9657. Chunk: SCL
  9658. short  v00=1, v01=20, v02=5, v03=5;
  9659.  
  9660.  
  9661.  
  9662. resume (1, 1);
  9663.  
  9664. if (activate (me, 0) || activate (child (me), 0) || activate 
  9665.  
  9666.     (sibling (child (me)), 0) || activate (sibling (sibling 
  9667.  
  9668.     (child (me))), 0))
  9669.  
  9670. {
  9671.  
  9672.   gvar (0, parent (me))=1;
  9673.  
  9674.   waitfs (3);
  9675.  
  9676.   repeat (v01)
  9677.  
  9678.   {
  9679.  
  9680.     yrot (me)+=v02*v00;
  9681.  
  9682.     waitf;
  9683.  
  9684.   }
  9685.  
  9686.   v02=-v02;
  9687.  
  9688.   if (v02==v03)
  9689.  
  9690.     gvar (0, parent (me))=0;
  9691.  
  9692.   clrtrig (me, 0);
  9693.  
  9694.   clrtrig (child (me), 0);
  9695.  
  9696.   clrtrig (sibling (child (me)), 0);
  9697.  
  9698.   clrtrig (sibling (sibling (child (me))), 0);
  9699.  
  9700. }
  9701. end
  9702. End_Chunk
  9703. Chunk: Rotations
  9704.  Initial: 0x0000 0x0000 0x0000
  9705.  Centre:  100 2800 3900
  9706. End_Chunk
  9707.  
  9708. Children:
  9709. ;
  9710. ;-------Object  259-------------------------------------------------------
  9711. ; 
  9712. Chunk: Standard
  9713.  Name:     "door1st[259]"
  9714.  Number:   259
  9715.  Size:     200 5600 4000
  9716.  Position: 0 0 0
  9717.  Type:     33
  9718.  Layer:    0
  9719.  OFlags:   r
  9720. End_Chunk
  9721. Chunk: Distancing
  9722.  Visible:   6000
  9723.  Invisible: 6374
  9724.  Replace:   260
  9725. End_Chunk
  9726. ;
  9727. ;-------Object  260-------------------------------------------------------
  9728. ; 
  9729. Chunk: Standard
  9730.  Name:     "door2nd[260]"
  9731.  Number:   260
  9732.  Size:     200 5600 4000
  9733.  Position: 0 0 0
  9734.  Type:     25
  9735.  Layer:    0
  9736.  OFlags:   r
  9737. End_Chunk
  9738. Chunk: Distancing
  9739.  Visible:   8000
  9740.  Invisible: 8499
  9741.  Replace:   261
  9742. End_Chunk
  9743. ;
  9744. ;-------Object  261-------------------------------------------------------
  9745. ; 
  9746. Chunk: Standard
  9747.  Name:     "door3rd[261]"
  9748.  Number:   261
  9749.  Size:     200 5600 4000
  9750.  Position: 0 0 0
  9751.  Type:     71
  9752.  Layer:    0
  9753.  DFlags:   R
  9754.  OFlags:   i
  9755. End_Chunk
  9756.  
  9757. End_Children
  9758.  
  9759. End_Children
  9760. ;
  9761. ;-------Object  136-------------------------------------------------------
  9762. ; 
  9763. Chunk: Standard
  9764.  Name:     "EndShelfUnit[136]"
  9765.  Number:   136
  9766.  Size:     3500 800 7600
  9767.  Position: 2850 6000 6350
  9768.  Type:     65535
  9769.  Layer:    0
  9770. End_Chunk
  9771.  
  9772. Children:
  9773. ;
  9774. ;-------Object  102-------------------------------------------------------
  9775. ; 
  9776. Chunk: Standard
  9777.  Name:     "EndShelfUnit[102]"
  9778.  Number:   102
  9779.  Size:     700 700 6900
  9780.  Position: 0 0 0
  9781.  Type:     35
  9782.  Layer:    0
  9783. End_Chunk
  9784. Chunk: Colours
  9785.  Number: 3
  9786.  0xBB 0xBA 0xBB
  9787. End_Chunk
  9788. ;
  9789. ;-------Object  135-------------------------------------------------------
  9790. ; 
  9791. Chunk: Standard
  9792.  Name:     "EndShelfUnit[135]"
  9793.  Number:   135
  9794.  Size:     3500 100 7600
  9795.  Position: 0 700 0
  9796.  Type:     0
  9797.  Layer:    0
  9798. End_Chunk
  9799. Chunk: Colours
  9800.  Number: 6
  9801.  0xBA 0x00 0x00 0xBB 0xB8 0x00
  9802. End_Chunk
  9803. ;
  9804. ;-------Object  123-------------------------------------------------------
  9805. ; 
  9806. Chunk: Standard
  9807.  Name:     "EndShelfUnit[123]"
  9808.  Number:   123
  9809.  Size:     700 700 700
  9810.  Position: 0 0 6900
  9811.  Type:     37
  9812.  Layer:    0
  9813. End_Chunk
  9814. Chunk: Colours
  9815.  Number: 9
  9816.  0xBB 0xB8 0xBC 0xBC 0xBB 0xBC 0xBB 0xBA 0xBB
  9817. End_Chunk
  9818. ;
  9819. ;-------Object  134-------------------------------------------------------
  9820. ; 
  9821. Chunk: Standard
  9822.  Name:     "EndShelfUnit[134]"
  9823.  Number:   134
  9824.  Size:     2800 700 700
  9825.  Position: 700 0 6900
  9826.  Type:     36
  9827.  Layer:    0
  9828. End_Chunk
  9829. Chunk: Colours
  9830.  Number: 3
  9831.  0xBC 0xBB 0xBC
  9832. End_Chunk
  9833.  
  9834. End_Children
  9835.  
  9836. End_Children
  9837. ;
  9838. ;-------Object  398-------------------------------------------------------
  9839. ; 
  9840. Chunk: Standard
  9841.  Name:     "StdWallUnit-2[398]"
  9842.  Number:   398
  9843.  Size:     15000 10280 4000
  9844.  Position: 9700 14920 0
  9845.  Type:     65535
  9846.  Layer:    0
  9847. End_Chunk
  9848.  
  9849. Children:
  9850. ;
  9851. ;-------Object   57-------------------------------------------------------
  9852. ; 
  9853. Chunk: Standard
  9854.  Name:     "StdWallUnit-2[57]"
  9855.  Number:   57
  9856.  Size:     5000 6000 3000
  9857.  Position: 10000 0 0
  9858.  Type:     65535
  9859.  Layer:    0
  9860. End_Chunk
  9861. Chunk: SCL
  9862. short  v00;
  9863.  
  9864.  
  9865. end
  9866. End_Chunk
  9867.  
  9868. Children:
  9869. ;
  9870. ;-------Object   59-------------------------------------------------------
  9871. ; 
  9872. Chunk: Standard
  9873.  Name:     "StdWallUnit-2"
  9874.  Number:   59
  9875.  Size:     5000 400 2600
  9876.  Position: 0 0 0
  9877.  Type:     0
  9878.  Layer:    0
  9879. End_Chunk
  9880. Chunk: Colours
  9881.  Number: 6
  9882.  0xBD 0x00 0x00 0xBC 0x00 0xBE
  9883. End_Chunk
  9884. ;
  9885. ;-------Object  153-------------------------------------------------------
  9886. ; 
  9887. Chunk: Standard
  9888.  Name:     "StdWallUnit-2[153]"
  9889.  Number:   153
  9890.  Size:     5000 5600 2800
  9891.  Position: 0 400 0
  9892.  Type:     63
  9893.  Layer:    0
  9894. End_Chunk
  9895. Chunk: Colours
  9896.  Number: 11
  9897.  0x7F 0xBA 0xBF 0xBA 0xBC 0xBE 0xBC 0xBF 0xBC 0xBD 0x00
  9898. End_Chunk
  9899. ;
  9900. ;-------Object  105-------------------------------------------------------
  9901. ; 
  9902. Chunk: Standard
  9903.  Name:     "door hold[105]"
  9904.  Number:   105
  9905.  Size:     5000 5600 200
  9906.  Position: 0 400 2800
  9907.  Type:     113
  9908.  Layer:    1
  9909. End_Chunk
  9910. Chunk: TexCoords
  9911.  Number: 1
  9912.  Mode:   0
  9913.  SubChunk
  9914.   Facet:     3
  9915.   ImageRef:  1
  9916.   PixScale:  0
  9917.   NumCoords: 4
  9918.     0.00000 0.00000
  9919.     0.00000 1.00000
  9920.     1.00000 1.00000
  9921.     1.00000 0.00000
  9922. End_Chunk
  9923. Chunk: Colours
  9924.  Number: 6
  9925.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  9926. End_Chunk
  9927.  
  9928. Chunk: ImageRef
  9929.  Number: 4
  9930.  Index: 1 Image: 1
  9931.  Index: 2 Image: 2
  9932.  Index: 3 Image: 3
  9933.  Index: 4 Image: 4
  9934. End_Chunk
  9935. Chunk: SCL
  9936. short  v00=-1, v01=20, v02=5, v03=5;
  9937.  
  9938.  
  9939.  
  9940. resume (1, 1);
  9941.  
  9942. if (activate (me, 0) || activate (child (me), 0) || activate 
  9943.  
  9944.     (sibling (child (me)), 0) || activate (sibling (sibling 
  9945.  
  9946.     (child (me))), 0))
  9947.  
  9948. {
  9949.  
  9950.   gvar (0, parent (me))=1;
  9951.  
  9952.   waitfs (3);
  9953.  
  9954.   repeat (v01)
  9955.  
  9956.   {
  9957.  
  9958.     yrot (me)+=v02*v00;
  9959.  
  9960.     waitf;
  9961.  
  9962.   }
  9963.  
  9964.   v02=-v02;
  9965.  
  9966.   if (v02==v03)
  9967.  
  9968.     gvar (0, parent (me))=0;
  9969.  
  9970.   clrtrig (me, 0);
  9971.  
  9972.   clrtrig (child (me), 0);
  9973.  
  9974.   clrtrig (sibling (child (me)), 0);
  9975.  
  9976.   clrtrig (sibling (sibling (child (me))), 0);
  9977.  
  9978. }
  9979. end
  9980. End_Chunk
  9981. Chunk: Rotations
  9982.  Initial: 0x0000 0x0000 0x0000
  9983.  Centre:  242 2800 0
  9984. End_Chunk
  9985.  
  9986. Children:
  9987. ;
  9988. ;-------Object  154-------------------------------------------------------
  9989. ; 
  9990. Chunk: Standard
  9991.  Name:     "door1st[154]"
  9992.  Number:   154
  9993.  Size:     5000 5600 200
  9994.  Position: 0 0 0
  9995.  Type:     59
  9996.  Layer:    0
  9997.  OFlags:   r
  9998. End_Chunk
  9999. Chunk: Distancing
  10000.  Visible:   6000
  10001.  Invisible: 6096
  10002.  Replace:   262
  10003. End_Chunk
  10004. ;
  10005. ;-------Object  262-------------------------------------------------------
  10006. ; 
  10007. Chunk: Standard
  10008.  Name:     "door2nd[262]"
  10009.  Number:   262
  10010.  Size:     5000 5600 200
  10011.  Position: 0 0 0
  10012.  Type:     23
  10013.  Layer:    0
  10014.  OFlags:   r
  10015. End_Chunk
  10016. Chunk: Distancing
  10017.  Visible:   8000
  10018.  Invisible: 8128
  10019.  Replace:   263
  10020. End_Chunk
  10021. ;
  10022. ;-------Object  263-------------------------------------------------------
  10023. ; 
  10024. Chunk: Standard
  10025.  Name:     "door3rd[263]"
  10026.  Number:   263
  10027.  Size:     5000 5600 200
  10028.  Position: 0 0 0
  10029.  Type:     70
  10030.  Layer:    0
  10031.  DFlags:   R
  10032.  OFlags:   i
  10033. End_Chunk
  10034.  
  10035. End_Children
  10036.  
  10037. End_Children
  10038. ;
  10039. ;-------Object   61-------------------------------------------------------
  10040. ; 
  10041. Chunk: Standard
  10042.  Name:     "Canopy"
  10043.  Number:   61
  10044.  Size:     10000 6000 4000
  10045.  Position: 0 4280 0
  10046.  Type:     60
  10047.  Layer:    0
  10048. End_Chunk
  10049. Chunk: Colours
  10050.  Number: 34
  10051.  0xB8 0xB6 0xB4 0xB9 0xB7 0xB5 0xB9 0xB6 0xB3 0xB8 0xB7 0xB3 0xB4 0xB5 0xB7 0xBA
  10052.  0xBA 0xBA 0xBA 0xB7 0xBC 0xBE 0xBE 0xBE 0xBE 0xBE 0xBF 0xBE 0xBD 0xBC 0xBE 0xBD
  10053.  0xBC 0xBF
  10054. End_Chunk
  10055. ;
  10056. ;-------Object  147-------------------------------------------------------
  10057. ; 
  10058. Chunk: Standard
  10059.  Name:     "EndShelfUnit[147]"
  10060.  Number:   147
  10061.  Size:     5000 800 3500
  10062.  Position: 10000 6000 0
  10063.  Type:     65535
  10064.  Layer:    0
  10065. End_Chunk
  10066.  
  10067. Children:
  10068. ;
  10069. ;-------Object  149-------------------------------------------------------
  10070. ; 
  10071. Chunk: Standard
  10072.  Name:     "EndShelfUnit[149]"
  10073.  Number:   149
  10074.  Size:     5000 100 3500
  10075.  Position: 0 700 0
  10076.  Type:     0
  10077.  Layer:    0
  10078. End_Chunk
  10079. Chunk: Colours
  10080.  Number: 6
  10081.  0xBF 0xBA 0x00 0xBB 0xB8 0x00
  10082. End_Chunk
  10083. ;
  10084. ;-------Object  151-------------------------------------------------------
  10085. ; 
  10086. Chunk: Standard
  10087.  Name:     "EndShelfUnit[151]"
  10088.  Number:   151
  10089.  Size:     5000 700 700
  10090.  Position: 0 0 2800
  10091.  Type:     62
  10092.  Layer:    0
  10093. End_Chunk
  10094. Chunk: Colours
  10095.  Number: 5
  10096.  0xBB 0xB8 0xBC 0xBF 0xBF
  10097. End_Chunk
  10098.  
  10099. End_Children
  10100.  
  10101. End_Children
  10102. ;
  10103. ;-------Object  183-------------------------------------------------------
  10104. ; 
  10105. Chunk: Standard
  10106.  Name:     "EndShelfUnit[183]"
  10107.  Number:   183
  10108.  Size:     11400 800 3700
  10109.  Position: 9000 25200 0
  10110.  Type:     65535
  10111.  Layer:    0
  10112. End_Chunk
  10113.  
  10114. Children:
  10115. ;
  10116. ;-------Object  184-------------------------------------------------------
  10117. ; 
  10118. Chunk: Standard
  10119.  Name:     "EndShelfUnit[184]"
  10120.  Number:   184
  10121.  Size:     700 700 3000
  10122.  Position: 0 0 0
  10123.  Type:     35
  10124.  Layer:    0
  10125. End_Chunk
  10126. Chunk: Colours
  10127.  Number: 3
  10128.  0xBC 0xBB 0xBC
  10129. End_Chunk
  10130. ;
  10131. ;-------Object  188-------------------------------------------------------
  10132. ; 
  10133. Chunk: Standard
  10134.  Name:     "EndShelfUnit[188]"
  10135.  Number:   188
  10136.  Size:     11400 100 3700
  10137.  Position: 0 700 0
  10138.  Type:     0
  10139.  Layer:    0
  10140. End_Chunk
  10141. Chunk: Colours
  10142.  Number: 6
  10143.  0xBA 0x00 0xB8 0xBA 0xB7 0x00
  10144. End_Chunk
  10145. ;
  10146. ;-------Object  190-------------------------------------------------------
  10147. ; 
  10148. Chunk: Standard
  10149.  Name:     "EndShelfUnit[190]"
  10150.  Number:   190
  10151.  Size:     700 700 700
  10152.  Position: 0 0 3000
  10153.  Type:     37
  10154.  Layer:    0
  10155. End_Chunk
  10156. Chunk: Colours
  10157.  Number: 9
  10158.  0xBB 0xB8 0xBC 0xBB 0xBA 0xBB 0xBC 0xBB 0xBC
  10159. End_Chunk
  10160. ;
  10161. ;-------Object  191-------------------------------------------------------
  10162. ; 
  10163. Chunk: Standard
  10164.  Name:     "EndShelfUnit[191]"
  10165.  Number:   191
  10166.  Size:     700 700 700
  10167.  Position: 10700 0 3000
  10168.  Type:     38
  10169.  Layer:    0
  10170. End_Chunk
  10171. Chunk: Colours
  10172.  Number: 9
  10173.  0xBB 0xB8 0xBC 0xBA 0xB8 0xBA 0xBB 0xBA 0xBB
  10174. End_Chunk
  10175. ;
  10176. ;-------Object  185-------------------------------------------------------
  10177. ; 
  10178. Chunk: Standard
  10179.  Name:     "EndShelfUnit[185]"
  10180.  Number:   185
  10181.  Size:     700 700 3000
  10182.  Position: 10700 0 0
  10183.  Type:     39
  10184.  Layer:    0
  10185. End_Chunk
  10186. Chunk: Colours
  10187.  Number: 9
  10188.  0xBB 0xB8 0xBC 0xBA 0xB8 0xBA 0xBB 0xBA 0xBB
  10189. End_Chunk
  10190. ;
  10191. ;-------Object  192-------------------------------------------------------
  10192. ; 
  10193. Chunk: Standard
  10194.  Name:     "EndShelfUnit[192]"
  10195.  Number:   192
  10196.  Size:     10000 700 700
  10197.  Position: 700 0 3000
  10198.  Type:     36
  10199.  Layer:    0
  10200. End_Chunk
  10201. Chunk: Colours
  10202.  Number: 3
  10203.  0xBB 0xBA 0xBB
  10204. End_Chunk
  10205.  
  10206. End_Children
  10207. ;
  10208. ;-------Object  107-------------------------------------------------------
  10209. ; 
  10210. Chunk: Standard
  10211.  Name:     "StdWallUnit-2[107]"
  10212.  Number:   107
  10213.  Size:     3000 6000 3000
  10214.  Position: 6700 14920 0
  10215.  Type:     65535
  10216.  Layer:    0
  10217. End_Chunk
  10218. Chunk: SCL
  10219. short  v00;
  10220.  
  10221.  
  10222. end
  10223. End_Chunk
  10224.  
  10225. Children:
  10226. ;
  10227. ;-------Object  108-------------------------------------------------------
  10228. ; 
  10229. Chunk: Standard
  10230.  Name:     "StdWallUnit-2[108]"
  10231.  Number:   108
  10232.  Size:     3000 5600 2800
  10233.  Position: 0 400 0
  10234.  Type:     63
  10235.  Layer:    0
  10236. End_Chunk
  10237. Chunk: Colours
  10238.  Number: 11
  10239.  0x7F 0xBA 0xBF 0xBA 0xBC 0xBE 0xBC 0xBF 0xBC 0x00 0xB9
  10240. End_Chunk
  10241. ;
  10242. ;-------Object  194-------------------------------------------------------
  10243. ; 
  10244. Chunk: Standard
  10245.  Name:     "StdWallUnit-2[194]"
  10246.  Number:   194
  10247.  Size:     3000 400 2800
  10248.  Position: 0 0 0
  10249.  Type:     0
  10250.  Layer:    0
  10251. End_Chunk
  10252. Chunk: Colours
  10253.  Number: 11
  10254.  0x00 0x00 0xB9 0xBD 0x00 0xBE 0xBC 0xBF 0xBC 0xBD 0xBE
  10255. End_Chunk
  10256. ;
  10257. ;-------Object  106-------------------------------------------------------
  10258. ; 
  10259. Chunk: Standard
  10260.  Name:     "door hold[106]"
  10261.  Number:   106
  10262.  Size:     3000 5600 200
  10263.  Position: 0 400 2800
  10264.  Type:     113
  10265.  Layer:    1
  10266. End_Chunk
  10267. Chunk: TexCoords
  10268.  Number: 1
  10269.  Mode:   0
  10270.  SubChunk
  10271.   Facet:     3
  10272.   ImageRef:  1
  10273.   PixScale:  0
  10274.   NumCoords: 4
  10275.     0.00000 0.00000
  10276.     0.00000 1.00000
  10277.     1.00000 1.00000
  10278.     1.00000 0.00000
  10279. End_Chunk
  10280.  
  10281. Chunk: ImageRef
  10282.  Number: 4
  10283.  Index: 1 Image: 1
  10284.  Index: 2 Image: 2
  10285.  Index: 3 Image: 3
  10286.  Index: 4 Image: 4
  10287. End_Chunk
  10288. Chunk: Colours
  10289.  Number: 6
  10290.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  10291. End_Chunk
  10292. Chunk: SCL
  10293. short  v00=-1, v01=20, v02=5, v03=5;
  10294.  
  10295.  
  10296.  
  10297. resume (1, 1);
  10298.  
  10299. if (activate (me, 0) || activate (child (me), 0) || activate 
  10300.  
  10301.     (sibling (child (me)), 0) || activate (sibling (sibling 
  10302.  
  10303.     (child (me))), 0))
  10304.  
  10305. {
  10306.  
  10307.   gvar (0, parent (me))=1;
  10308.  
  10309.   waitfs (3);
  10310.  
  10311.   repeat (v01)
  10312.  
  10313.   {
  10314.  
  10315.     yrot (me)+=v02*v00;
  10316.  
  10317.     waitf;
  10318.  
  10319.   }
  10320.  
  10321.   v02=-v02;
  10322.  
  10323.   if (v02==v03)
  10324.  
  10325.     gvar (0, parent (me))=0;
  10326.  
  10327.   clrtrig (me, 0);
  10328.  
  10329.   clrtrig (child (me), 0);
  10330.  
  10331.   clrtrig (sibling (child (me)), 0);
  10332.  
  10333.   clrtrig (sibling (sibling (child (me))), 0);
  10334.  
  10335. }
  10336. end
  10337. End_Chunk
  10338. Chunk: Rotations
  10339.  Initial: 0x0000 0x0000 0x0000
  10340.  Centre:  145 2800 0
  10341. End_Chunk
  10342.  
  10343. Children:
  10344. ;
  10345. ;-------Object  264-------------------------------------------------------
  10346. ; 
  10347. Chunk: Standard
  10348.  Name:     "door1st[264]"
  10349.  Number:   264
  10350.  Size:     3000 5600 200
  10351.  Position: 0 0 0
  10352.  Type:     59
  10353.  Layer:    0
  10354.  OFlags:   r
  10355. End_Chunk
  10356. Chunk: Distancing
  10357.  Visible:   3600
  10358.  Invisible: 6096
  10359.  Replace:   265
  10360. End_Chunk
  10361. ;
  10362. ;-------Object  265-------------------------------------------------------
  10363. ; 
  10364. Chunk: Standard
  10365.  Name:     "door2nd[265]"
  10366.  Number:   265
  10367.  Size:     3000 5600 200
  10368.  Position: 0 0 0
  10369.  Type:     23
  10370.  Layer:    0
  10371.  OFlags:   r
  10372. End_Chunk
  10373. Chunk: Distancing
  10374.  Visible:   4800
  10375.  Invisible: 8128
  10376.  Replace:   266
  10377. End_Chunk
  10378. ;
  10379. ;-------Object  266-------------------------------------------------------
  10380. ; 
  10381. Chunk: Standard
  10382.  Name:     "door3rd[266]"
  10383.  Number:   266
  10384.  Size:     3000 5600 200
  10385.  Position: 0 0 0
  10386.  Type:     70
  10387.  Layer:    0
  10388.  DFlags:   R
  10389.  OFlags:   i
  10390. End_Chunk
  10391.  
  10392. End_Children
  10393.  
  10394. End_Children
  10395. ;
  10396. ;-------Object  137-------------------------------------------------------
  10397. ; 
  10398. Chunk: Standard
  10399.  Name:     "EndShelfUnit[137]"
  10400.  Number:   137
  10401.  Size:     9700 800 7600
  10402.  Position: 0 20920 0
  10403.  Type:     65535
  10404.  Layer:    0
  10405. End_Chunk
  10406.  
  10407. Children:
  10408. ;
  10409. ;-------Object  138-------------------------------------------------------
  10410. ; 
  10411. Chunk: Standard
  10412.  Name:     "EndShelfUnit[138]"
  10413.  Number:   138
  10414.  Size:     700 700 5600
  10415.  Position: 0 0 0
  10416.  Type:     35
  10417.  Layer:    0
  10418. End_Chunk
  10419. Chunk: Colours
  10420.  Number: 3
  10421.  0xBC 0xBB 0xBC
  10422. End_Chunk
  10423. ;
  10424. ;-------Object  143-------------------------------------------------------
  10425. ; 
  10426. Chunk: Standard
  10427.  Name:     "EndShelfUnit[143]"
  10428.  Number:   143
  10429.  Size:     700 700 2100
  10430.  Position: 6700 0 3500
  10431.  Type:     39
  10432.  Layer:    0
  10433. End_Chunk
  10434. Chunk: Colours
  10435.  Number: 3
  10436.  0xBA 0xB8 0xBA
  10437. End_Chunk
  10438. ;
  10439. ;-------Object  144-------------------------------------------------------
  10440. ; 
  10441. Chunk: Standard
  10442.  Name:     "EndShelfUnit[144]"
  10443.  Number:   144
  10444.  Size:     700 700 700
  10445.  Position: 6700 0 2800
  10446.  Type:     40
  10447.  Layer:    0
  10448. End_Chunk
  10449. Chunk: Colours
  10450.  Number: 7
  10451.  0xBB 0xB8 0x00 0xBA 0xBB 0xBC 0xBA
  10452. End_Chunk
  10453. ;
  10454. ;-------Object  145-------------------------------------------------------
  10455. ; 
  10456. Chunk: Standard
  10457.  Name:     "EndShelfUnit[145]"
  10458.  Number:   145
  10459.  Size:     2300 700 700
  10460.  Position: 7400 0 2800
  10461.  Type:     62
  10462.  Layer:    0
  10463. End_Chunk
  10464. Chunk: Colours
  10465.  Number: 7
  10466.  0xBB 0xBA 0xBB 0x00 0x00 0xB9 0xB9
  10467. End_Chunk
  10468. ;
  10469. ;-------Object  139-------------------------------------------------------
  10470. ; 
  10471. Chunk: Standard
  10472.  Name:     "EndShelfUnit[139]"
  10473.  Number:   139
  10474.  Size:     7400 100 6300
  10475.  Position: 0 700 0
  10476.  Type:     0
  10477.  Layer:    0
  10478. End_Chunk
  10479. Chunk: Colours
  10480.  Number: 6
  10481.  0xBA 0x00 0xB8 0xBA 0xB7 0x00
  10482. End_Chunk
  10483. ;
  10484. ;-------Object  146-------------------------------------------------------
  10485. ; 
  10486. Chunk: Standard
  10487.  Name:     "EndShelfUnit[146]"
  10488.  Number:   146
  10489.  Size:     2300 100 3500
  10490.  Position: 7400 700 0
  10491.  Type:     0
  10492.  Layer:    0
  10493. End_Chunk
  10494. Chunk: Colours
  10495.  Number: 6
  10496.  0x00 0x00 0xB9 0xBA 0xB7 0x00
  10497. End_Chunk
  10498. ;
  10499. ;-------Object  140-------------------------------------------------------
  10500. ; 
  10501. Chunk: Standard
  10502.  Name:     "EndShelfUnit[140]"
  10503.  Number:   140
  10504.  Size:     700 700 700
  10505.  Position: 0 0 5600
  10506.  Type:     37
  10507.  Layer:    0
  10508. End_Chunk
  10509. Chunk: Colours
  10510.  Number: 9
  10511.  0xBB 0xB8 0xBC 0xBB 0xBA 0xBB 0xBC 0xBB 0xBC
  10512. End_Chunk
  10513. ;
  10514. ;-------Object  142-------------------------------------------------------
  10515. ; 
  10516. Chunk: Standard
  10517.  Name:     "EndShelfUnit[142]"
  10518.  Number:   142
  10519.  Size:     700 700 700
  10520.  Position: 6700 0 5600
  10521.  Type:     38
  10522.  Layer:    0
  10523. End_Chunk
  10524. Chunk: Colours
  10525.  Number: 9
  10526.  0xBB 0xB8 0xBC 0xBA 0xB8 0xBA 0xBB 0xBA 0xBB
  10527. End_Chunk
  10528. ;
  10529. ;-------Object  141-------------------------------------------------------
  10530. ; 
  10531. Chunk: Standard
  10532.  Name:     "EndShelfUnit[141]"
  10533.  Number:   141
  10534.  Size:     6000 700 700
  10535.  Position: 700 0 5600
  10536.  Type:     36
  10537.  Layer:    0
  10538. End_Chunk
  10539. Chunk: Colours
  10540.  Number: 3
  10541.  0xBB 0xBA 0xBB
  10542. End_Chunk
  10543.  
  10544. End_Children
  10545. ;
  10546. ;-------Object  752-------------------------------------------------------
  10547. ; 
  10548. Chunk: Standard
  10549.  Name:     "HOBSON"
  10550.  Number:   752
  10551.  Size:     6000 550 5200
  10552.  Position: 11700 9100 300
  10553.  Type:     65535
  10554.  Layer:    0
  10555. End_Chunk
  10556. Chunk: Colours
  10557.  Number: 18
  10558.  0x0E 0x0E 0x0E 0x0E 0x06 0x06 0x06 0x06 0x06 0x06 0x06 0x06 0x06 0x06 0x06 0x06
  10559.  0x08 0x08
  10560. End_Chunk
  10561.  
  10562. Children:
  10563. ;
  10564. ;-------Object  158-------------------------------------------------------
  10565. ; 
  10566. Chunk: Standard
  10567.  Name:     "hob hold[158]"
  10568.  Number:   158
  10569.  Size:     6000 400 5000
  10570.  Position: 0 0 0
  10571.  Type:     65535
  10572.  Layer:    0
  10573. End_Chunk
  10574.  
  10575. Children:
  10576. ;
  10577. ;-------Object  157-------------------------------------------------------
  10578. ; 
  10579. Chunk: Standard
  10580.  Name:     "Ring"
  10581.  Number:   157
  10582.  Size:     6000 100 5000
  10583.  Position: 0 0 0
  10584.  Type:     50
  10585.  Layer:    0
  10586. End_Chunk
  10587. Chunk: Default Colours
  10588.  Number: 27
  10589.  0x29 0x11 0x2D 0x2E 0x2D 0x2C 0x2D 0xAF 0xAF 0x2C 0x2B 0xAF 0x2C 0x2B 0xAF 0x24
  10590.  0x20 0x22 0x24 0x23 0x25 0x23 0x25 0x2D 0x2D 0x2D 0x2D
  10591. End_Chunk
  10592. Chunk: SCL
  10593. /*
  10594.  
  10595.             This code will set the colour of the
  10596.  
  10597.             circular facets on the hob to a colour
  10598.  
  10599.             depending on the rotational setting
  10600.  
  10601.             of the respective knob.
  10602.  
  10603. */
  10604.  
  10605. setcol (0xAF+yrot (#267)/10, 12, me);
  10606.  
  10607. setcol (0xAF+yrot (#268)/10, 15, me);
  10608.  
  10609. setcol (0xAF+yrot (#271)/10, 9, me);
  10610.  
  10611. setcol (0xAF+yrot (#274)/10, 8, me);
  10612. end
  10613. End_Chunk
  10614. Chunk: Colours
  10615.  Number: 27
  10616.  0x29 0x11 0x2D 0x2E 0x2D 0x2C 0x2D 0xAF 0xAF 0x2C 0x2B 0xAF 0x2C 0x2B 0xAF 0x24
  10617.  0x20 0x22 0x24 0x23 0x25 0x23 0x25 0x2D 0x2D 0x2D 0x2D
  10618. End_Chunk
  10619. ;
  10620. ;-------Object  267-------------------------------------------------------
  10621. ; 
  10622. Chunk: Standard
  10623.  Name:     "Worktop[267]"
  10624.  Number:   267
  10625.  Size:     500 150 500
  10626.  Position: 450 100 3700
  10627.  Type:     65535
  10628.  Layer:    0
  10629. End_Chunk
  10630. Chunk: Rotations
  10631.  Initial: 0x0000 0x0000 0x0000
  10632.  Centre:  250 75 250
  10633. End_Chunk
  10634.  
  10635. Children:
  10636. ;
  10637. ;-------Object  159-------------------------------------------------------
  10638. ; 
  10639. Chunk: Standard
  10640.  Name:     "knob"
  10641.  Number:   159
  10642.  Size:     500 150 500
  10643.  Position: 0 0 0
  10644.  Type:     48
  10645.  Layer:    0
  10646.  OFlags:   r
  10647. End_Chunk
  10648. Chunk: Colours
  10649.  Number: 102
  10650.  0x2B 0x73 0x85 0x82 0x83 0x84 0x24 0xBA 0xBB 0xBA 0xB9 0x25 0xBB 0xBC 0xBB 0xBA
  10651.  0x26 0xBC 0xBD 0xBC 0xBB 0x27 0xBD 0xBE 0xBD 0xBC 0x28 0xBE 0xBF 0xBE 0xBD 0x29
  10652.  0xBD 0xBE 0xBD 0xBC 0x23 0xB9 0xBA 0xB9 0xB8 0x24 0xB8 0xB9 0xB8 0xB7 0x25 0xB7
  10653.  0xB8 0xB7 0xB6 0x26 0xB6 0xB7 0xB6 0xB5 0x27 0xB7 0xB8 0xB7 0xB6 0x2A 0xBC 0xBD
  10654.  0xBC 0xBB 0x2B 0xBB 0xBC 0xBB 0xBA 0x2A 0xBA 0xBB 0xBA 0xB9 0x29 0xB9 0xBA 0xB9
  10655.  0xB8 0x28 0xB8 0xB9 0xB8 0xB7 0x17 0x18 0x19 0x1A 0x1B 0x1C 0x18 0x19 0x1A 0x1B
  10656.  0x1C 0x1D 0x1E 0x1F 0x1E 0x1D
  10657. End_Chunk
  10658. Chunk: SCL
  10659. short  v00=-1, v01=37, v02=4;
  10660.  
  10661.  
  10662.  
  10663. /*
  10664.  
  10665.  
  10666.  
  10667.             v00     holds direction to turn knob.
  10668.  
  10669.             v01     holds number of frames over which to rotate knob.
  10670.  
  10671.             v02     holds increments in degrees to rotate knob per frame.
  10672.  
  10673.  
  10674.  
  10675. */
  10676.  
  10677. resume (0, 1);
  10678.  
  10679. if (activate (me, 0))
  10680.  
  10681. {
  10682.  
  10683. /*
  10684.  
  10685.  
  10686.  
  10687.             Turn knob if activated
  10688.  
  10689.  
  10690.  
  10691. */
  10692.  
  10693.   repeat (v01)
  10694.  
  10695.   {
  10696.  
  10697.     yrot (parent (me))+=v02*v00;
  10698.  
  10699.     waitf;
  10700.  
  10701.   }
  10702.  
  10703.  
  10704.  
  10705. /*
  10706.  
  10707.  
  10708.  
  10709.             Set new direction
  10710.  
  10711.  
  10712.  
  10713. */
  10714.  
  10715.   v02=-v02;
  10716.  
  10717.   clrtrig (me, 0);
  10718.  
  10719. }
  10720. end
  10721. End_Chunk
  10722. Chunk: Distancing
  10723.  Visible:   6000
  10724.  Invisible: 6375
  10725.  Replace:   109
  10726. End_Chunk
  10727. ;
  10728. ;-------Object  109-------------------------------------------------------
  10729. ; 
  10730. Chunk: Standard
  10731.  Name:     "knob-rep"
  10732.  Number:   109
  10733.  Size:     500 150 500
  10734.  Position: 0 0 0
  10735.  Type:     72
  10736.  Layer:    0
  10737.  DFlags:   R
  10738.  OFlags:   i
  10739. End_Chunk
  10740.  
  10741. End_Children
  10742. ;
  10743. ;-------Object  268-------------------------------------------------------
  10744. ; 
  10745. Chunk: Standard
  10746.  Name:     "Worktop[268]"
  10747.  Number:   268
  10748.  Size:     500 150 500
  10749.  Position: 450 100 3000
  10750.  Type:     65535
  10751.  Layer:    0
  10752. End_Chunk
  10753. Chunk: Rotations
  10754.  Initial: 0x0000 0x0000 0x0000
  10755.  Centre:  250 75 250
  10756. End_Chunk
  10757.  
  10758. Children:
  10759. ;
  10760. ;-------Object  269-------------------------------------------------------
  10761. ; 
  10762. Chunk: Standard
  10763.  Name:     "knob2"
  10764.  Number:   269
  10765.  Size:     500 150 500
  10766.  Position: 0 0 0
  10767.  Type:     48
  10768.  Layer:    0
  10769.  OFlags:   r
  10770. End_Chunk
  10771. Chunk: Colours
  10772.  Number: 102
  10773.  0x2B 0x73 0x85 0x82 0x83 0x84 0x24 0xBA 0xBB 0xBA 0xB9 0x25 0xBB 0xBC 0xBB 0xBA
  10774.  0x26 0xBC 0xBD 0xBC 0xBB 0x27 0xBD 0xBE 0xBD 0xBC 0x28 0xBE 0xBF 0xBE 0xBD 0x29
  10775.  0xBD 0xBE 0xBD 0xBC 0x23 0xB9 0xBA 0xB9 0xB8 0x24 0xB8 0xB9 0xB8 0xB7 0x25 0xB7
  10776.  0xB8 0xB7 0xB6 0x26 0xB6 0xB7 0xB6 0xB5 0x27 0xB7 0xB8 0xB7 0xB6 0x2A 0xBC 0xBD
  10777.  0xBC 0xBB 0x2B 0xBB 0xBC 0xBB 0xBA 0x2A 0xBA 0xBB 0xBA 0xB9 0x29 0xB9 0xBA 0xB9
  10778.  0xB8 0x28 0xB8 0xB9 0xB8 0xB7 0x17 0x18 0x19 0x1A 0x1B 0x1C 0x18 0x19 0x1A 0x1B
  10779.  0x1C 0x1D 0x1E 0x1F 0x1E 0x1D
  10780. End_Chunk
  10781. Chunk: SCL
  10782. short  v00=-1, v01=37, v02=4;
  10783.  
  10784.  
  10785.  
  10786. /*
  10787.  
  10788.  
  10789.  
  10790.             v00     holds direction to turn knob.
  10791.  
  10792.             v01     holds number of frames over which to rotate knob.
  10793.  
  10794.             v02     holds increments in degrees to rotate knob per frame.
  10795.  
  10796.  
  10797.  
  10798. */
  10799.  
  10800. resume (0, 1);
  10801.  
  10802. if (activate (me, 0))
  10803.  
  10804. {
  10805.  
  10806. /*
  10807.  
  10808.  
  10809.  
  10810.             Turn knob if activated
  10811.  
  10812.  
  10813.  
  10814. */
  10815.  
  10816.   repeat (v01)
  10817.  
  10818.   {
  10819.  
  10820.     yrot (parent (me))+=v02*v00;
  10821.  
  10822.     waitf;
  10823.  
  10824.   }
  10825.  
  10826.  
  10827.  
  10828. /*
  10829.  
  10830.  
  10831.  
  10832.             Set new direction
  10833.  
  10834.  
  10835.  
  10836. */
  10837.  
  10838.   v02=-v02;
  10839.  
  10840.   clrtrig (me, 0);
  10841.  
  10842. }
  10843. end
  10844. End_Chunk
  10845. Chunk: Distancing
  10846.  Visible:   6000
  10847.  Invisible: 6375
  10848.  Replace:   270
  10849. End_Chunk
  10850. ;
  10851. ;-------Object  270-------------------------------------------------------
  10852. ; 
  10853. Chunk: Standard
  10854.  Name:     "knob2-rep"
  10855.  Number:   270
  10856.  Size:     500 150 500
  10857.  Position: 0 0 0
  10858.  Type:     72
  10859.  Layer:    0
  10860.  DFlags:   R
  10861.  OFlags:   i
  10862. End_Chunk
  10863.  
  10864. End_Children
  10865. ;
  10866. ;-------Object  271-------------------------------------------------------
  10867. ; 
  10868. Chunk: Standard
  10869.  Name:     "Disp1[271]"
  10870.  Number:   271
  10871.  Size:     500 150 500
  10872.  Position: 450 100 2300
  10873.  Type:     65535
  10874.  Layer:    0
  10875. End_Chunk
  10876. Chunk: Rotations
  10877.  Initial: 0x0000 0x0000 0x0000
  10878.  Centre:  250 75 250
  10879. End_Chunk
  10880.  
  10881. Children:
  10882. ;
  10883. ;-------Object  272-------------------------------------------------------
  10884. ; 
  10885. Chunk: Standard
  10886.  Name:     "knob3"
  10887.  Number:   272
  10888.  Size:     500 150 500
  10889.  Position: 0 0 0
  10890.  Type:     48
  10891.  Layer:    0
  10892.  OFlags:   r
  10893. End_Chunk
  10894. Chunk: Colours
  10895.  Number: 102
  10896.  0x2B 0x73 0x85 0x82 0x83 0x84 0x24 0xBA 0xBB 0xBA 0xB9 0x25 0xBB 0xBC 0xBB 0xBA
  10897.  0x26 0xBC 0xBD 0xBC 0xBB 0x27 0xBD 0xBE 0xBD 0xBC 0x28 0xBE 0xBF 0xBE 0xBD 0x29
  10898.  0xBD 0xBE 0xBD 0xBC 0x23 0xB9 0xBA 0xB9 0xB8 0x24 0xB8 0xB9 0xB8 0xB7 0x25 0xB7
  10899.  0xB8 0xB7 0xB6 0x26 0xB6 0xB7 0xB6 0xB5 0x27 0xB7 0xB8 0xB7 0xB6 0x2A 0xBC 0xBD
  10900.  0xBC 0xBB 0x2B 0xBB 0xBC 0xBB 0xBA 0x2A 0xBA 0xBB 0xBA 0xB9 0x29 0xB9 0xBA 0xB9
  10901.  0xB8 0x28 0xB8 0xB9 0xB8 0xB7 0x17 0x18 0x19 0x1A 0x1B 0x1C 0x18 0x19 0x1A 0x1B
  10902.  0x1C 0x1D 0x1E 0x1F 0x1E 0x1D
  10903. End_Chunk
  10904. Chunk: SCL
  10905. short  v00=-1, v01=37, v02=4;
  10906.  
  10907.  
  10908.  
  10909. /*
  10910.  
  10911.  
  10912.  
  10913.             v00     holds direction to turn knob.
  10914.  
  10915.             v01     holds number of frames over which to rotate knob.
  10916.  
  10917.             v02     holds increments in degrees to rotate knob per frame.
  10918.  
  10919.  
  10920.  
  10921. */
  10922.  
  10923. resume (0, 1);
  10924.  
  10925. if (activate (me, 0))
  10926.  
  10927. {
  10928.  
  10929. /*
  10930.  
  10931.  
  10932.  
  10933.             Turn knob if activated
  10934.  
  10935.  
  10936.  
  10937. */
  10938.  
  10939.   repeat (v01)
  10940.  
  10941.   {
  10942.  
  10943.     yrot (parent (me))+=v02*v00;
  10944.  
  10945.     waitf;
  10946.  
  10947.   }
  10948.  
  10949.  
  10950.  
  10951. /*
  10952.  
  10953.  
  10954.  
  10955.             Set new direction
  10956.  
  10957.  
  10958.  
  10959. */
  10960.  
  10961.   v02=-v02;
  10962.  
  10963.   clrtrig (me, 0);
  10964.  
  10965. }
  10966. end
  10967. End_Chunk
  10968. Chunk: Distancing
  10969.  Visible:   6000
  10970.  Invisible: 6375
  10971.  Replace:   273
  10972. End_Chunk
  10973. ;
  10974. ;-------Object  273-------------------------------------------------------
  10975. ; 
  10976. Chunk: Standard
  10977.  Name:     "knob3-rep"
  10978.  Number:   273
  10979.  Size:     500 150 500
  10980.  Position: 0 0 0
  10981.  Type:     72
  10982.  Layer:    0
  10983.  DFlags:   R
  10984.  OFlags:   i
  10985. End_Chunk
  10986.  
  10987. End_Children
  10988. ;
  10989. ;-------Object  274-------------------------------------------------------
  10990. ; 
  10991. Chunk: Standard
  10992.  Name:     "Disp1[274]"
  10993.  Number:   274
  10994.  Size:     500 150 500
  10995.  Position: 450 100 1600
  10996.  Type:     65535
  10997.  Layer:    0
  10998. End_Chunk
  10999. Chunk: Rotations
  11000.  Initial: 0x0000 0x0000 0x0000
  11001.  Centre:  250 75 250
  11002. End_Chunk
  11003.  
  11004. Children:
  11005. ;
  11006. ;-------Object  275-------------------------------------------------------
  11007. ; 
  11008. Chunk: Standard
  11009.  Name:     "knob4"
  11010.  Number:   275
  11011.  Size:     500 150 500
  11012.  Position: 0 0 0
  11013.  Type:     48
  11014.  Layer:    0
  11015.  OFlags:   r
  11016. End_Chunk
  11017. Chunk: Colours
  11018.  Number: 102
  11019.  0x2B 0x73 0x85 0x82 0x83 0x84 0x24 0xBA 0xBB 0xBA 0xB9 0x25 0xBB 0xBC 0xBB 0xBA
  11020.  0x26 0xBC 0xBD 0xBC 0xBB 0x27 0xBD 0xBE 0xBD 0xBC 0x28 0xBE 0xBF 0xBE 0xBD 0x29
  11021.  0xBD 0xBE 0xBD 0xBC 0x23 0xB9 0xBA 0xB9 0xB8 0x24 0xB8 0xB9 0xB8 0xB7 0x25 0xB7
  11022.  0xB8 0xB7 0xB6 0x26 0xB6 0xB7 0xB6 0xB5 0x27 0xB7 0xB8 0xB7 0xB6 0x2A 0xBC 0xBD
  11023.  0xBC 0xBB 0x2B 0xBB 0xBC 0xBB 0xBA 0x2A 0xBA 0xBB 0xBA 0xB9 0x29 0xB9 0xBA 0xB9
  11024.  0xB8 0x28 0xB8 0xB9 0xB8 0xB7 0x17 0x18 0x19 0x1A 0x1B 0x1C 0x18 0x19 0x1A 0x1B
  11025.  0x1C 0x1D 0x1E 0x1F 0x1E 0x1D
  11026. End_Chunk
  11027. Chunk: SCL
  11028. short  v00=-1, v01=37, v02=4;
  11029.  
  11030.  
  11031.  
  11032. /*
  11033.  
  11034.  
  11035.  
  11036.             v00     holds direction to turn knob.
  11037.  
  11038.             v01     holds number of frames over which to rotate knob.
  11039.  
  11040.             v02     holds increments in degrees to rotate knob per frame.
  11041.  
  11042.  
  11043.  
  11044. */
  11045.  
  11046. resume (0, 1);
  11047.  
  11048. if (activate (me, 0))
  11049.  
  11050. {
  11051.  
  11052. /*
  11053.  
  11054.  
  11055.  
  11056.             Turn knob if activated
  11057.  
  11058.  
  11059.  
  11060. */
  11061.  
  11062.   repeat (v01)
  11063.  
  11064.   {
  11065.  
  11066.     yrot (parent (me))+=v02*v00;
  11067.  
  11068.     waitf;
  11069.  
  11070.   }
  11071.  
  11072.  
  11073.  
  11074. /*
  11075.  
  11076.  
  11077.  
  11078.             Set new direction
  11079.  
  11080.  
  11081.  
  11082. */
  11083.  
  11084.   v02=-v02;
  11085.  
  11086.   clrtrig (me, 0);
  11087.  
  11088. }
  11089. end
  11090. End_Chunk
  11091. Chunk: Distancing
  11092.  Visible:   6000
  11093.  Invisible: 6375
  11094.  Replace:   276
  11095. End_Chunk
  11096. ;
  11097. ;-------Object  276-------------------------------------------------------
  11098. ; 
  11099. Chunk: Standard
  11100.  Name:     "knob4-rep"
  11101.  Number:   276
  11102.  Size:     500 150 500
  11103.  Position: 0 0 0
  11104.  Type:     72
  11105.  Layer:    0
  11106.  DFlags:   R
  11107.  OFlags:   i
  11108. End_Chunk
  11109.  
  11110. End_Children
  11111.  
  11112. End_Children
  11113.  
  11114. End_Children
  11115.  
  11116. End_Children
  11117. ;
  11118. ;-------Object   65-------------------------------------------------------
  11119. ; 
  11120. Chunk: Standard
  11121.  Name:     "Dishwasher[65]"
  11122.  Number:   65
  11123.  Size:     9000 9100 6000
  11124.  Position: 19350 0 22400
  11125.  Type:     65535
  11126.  Layer:    0
  11127. End_Chunk
  11128. Chunk: SCL
  11129. long   x;
  11130.  
  11131.  
  11132. end
  11133. End_Chunk
  11134.  
  11135. Children:
  11136. ;
  11137. ;-------Object   66-------------------------------------------------------
  11138. ; 
  11139. Chunk: Standard
  11140.  Name:     "Worktop[66]"
  11141.  Number:   66
  11142.  Size:     9000 280 6000
  11143.  Position: 0 8820 0
  11144.  Type:     17
  11145.  Layer:    0
  11146. End_Chunk
  11147. Chunk: Colours
  11148.  Number: 9
  11149.  0x62 0x61 0x60 0x61 0x62 0x63 0x61 0x64 0x18
  11150. End_Chunk
  11151. ;
  11152. ;-------Object  113-------------------------------------------------------
  11153. ; 
  11154. Chunk: Standard
  11155.  Name:     "FloorEndUnit[113]"
  11156.  Number:   113
  11157.  Size:     3000 8820 6000
  11158.  Position: 6000 0 0
  11159.  Type:     65535
  11160.  Layer:    0
  11161. End_Chunk
  11162.  
  11163. Children:
  11164. ;
  11165. ;-------Object   45-------------------------------------------------------
  11166. ; 
  11167. Chunk: Standard
  11168.  Name:     "FloorEndUnit"
  11169.  Number:   45
  11170.  Size:     2300 1500 4900
  11171.  Position: 0 0 1100
  11172.  Type:     26
  11173.  Layer:    0
  11174. End_Chunk
  11175. Chunk: Colours
  11176.  Number: 5
  11177.  0xBD 0xBA 0x00 0x00 0x00
  11178. End_Chunk
  11179. ;
  11180. ;-------Object  114-------------------------------------------------------
  11181. ; 
  11182. Chunk: Standard
  11183.  Name:     "FloorEndUnit[114]"
  11184.  Number:   114
  11185.  Size:     2800 200 5600
  11186.  Position: 0 1500 400
  11187.  Type:     30
  11188.  Layer:    0
  11189. End_Chunk
  11190. Chunk: Colours
  11191.  Number: 7
  11192.  0xB6 0xBA 0xB8 0xB9 0xBC 0xBF 0xB7
  11193. End_Chunk
  11194. ;
  11195. ;-------Object  117-------------------------------------------------------
  11196. ; 
  11197. Chunk: Standard
  11198.  Name:     "FloorEndUnit[117]"
  11199.  Number:   117
  11200.  Size:     2600 200 5400
  11201.  Position: 200 4650 400
  11202.  Type:     30
  11203.  Layer:    0
  11204. End_Chunk
  11205. Chunk: Colours
  11206.  Number: 7
  11207.  0xB6 0xBA 0xB8 0xB9 0xBC 0xBF 0xB7
  11208. End_Chunk
  11209. ;
  11210. ;-------Object  288-------------------------------------------------------
  11211. ; 
  11212. Chunk: Standard
  11213.  Name:     "FloorEndUnit[288]"
  11214.  Number:   288
  11215.  Size:     400 2970 400
  11216.  Position: 2400 4850 400
  11217.  Type:     65535
  11218.  Layer:    0
  11219. End_Chunk
  11220.  
  11221. Children:
  11222. ;
  11223. ;-------Object  289-------------------------------------------------------
  11224. ; 
  11225. Chunk: Standard
  11226.  Name:     "FloorEndUnit[289]"
  11227.  Number:   289
  11228.  Size:     400 1697 400
  11229.  Position: 0 1272 0
  11230.  Type:     28
  11231.  Layer:    0
  11232. End_Chunk
  11233. Chunk: Distancing
  11234.  Visible:   3000
  11235.  Invisible: 3187
  11236.  Replace:   290
  11237. End_Chunk
  11238. Chunk: Colours
  11239.  Number: 102
  11240.  0x87 0x86 0x85 0x82 0x83 0x84 0xB9 0xBA 0xB9 0xBA 0xBB 0xBA 0xBB 0xBA 0xBB 0xBC
  11241.  0xBB 0xBC 0xBB 0xBC 0xBD 0xBC 0xBD 0xBC 0xBD 0xBE 0xBD 0xBE 0xBD 0xBE 0xBF 0xBC
  11242.  0xBD 0xBC 0xBD 0xBE 0xB8 0xB9 0xB8 0xB9 0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xB6 0xB7
  11243.  0xB6 0xB7 0xB8 0xB5 0xB6 0xB5 0xB6 0xB7 0xB6 0xB7 0xB6 0xB7 0xB8 0xBB 0xBC 0xBB
  11244.  0xBC 0xBD 0xBA 0xBB 0xBA 0xBB 0xBC 0xB9 0xBA 0xB9 0xBA 0xBB 0xB8 0xB9 0xB8 0xB9
  11245.  0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xBA 0xBB 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  11246.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  11247. End_Chunk
  11248. ;
  11249. ;-------Object  290-------------------------------------------------------
  11250. ; 
  11251. Chunk: Standard
  11252.  Name:     "FloorEndUnit[290]"
  11253.  Number:   290
  11254.  Size:     400 1697 400
  11255.  Position: 0 1272 0
  11256.  Type:     65
  11257.  Layer:    0
  11258.  DFlags:   R
  11259.  OFlags:   i
  11260. End_Chunk
  11261. Chunk: Colours
  11262.  Number: 88
  11263.  0xBC 0xBA 0xB7 0xB9 0xBB 0xBD 0xB9 0xBA 0xB8 0xB6 0xB9 0xBB 0xBC 0xB7 0xB9 0xB6
  11264.  0xB7 0xB8 0xBB 0xBC 0xB7 0xBC 0xBD 0xBB 0xBA 0xBA 0xB6 0xB6 0xBC 0xBD 0xBC 0xBB
  11265.  0xBC 0xBB 0xBC 0xBA 0xB8 0xB9 0xB9 0xBB 0xBD 0xB9 0xBE 0xBD 0xB8 0xB9 0xBB 0xB7
  11266.  0xB6 0xB7 0xB8 0xB5 0xB6 0xB5 0xB6 0xB7 0xB6 0xB7 0xB6 0xB7 0xB8 0xBB 0xBC 0xBB
  11267.  0xBC 0xBD 0xBA 0xBB 0xBA 0xBB 0xBC 0xB9 0xBA 0xB9 0xBA 0xBB 0xB8 0xB9 0xB8 0xB9
  11268.  0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xBF 0xBE
  11269. End_Chunk
  11270. ;
  11271. ;-------Object  291-------------------------------------------------------
  11272. ; 
  11273. Chunk: Standard
  11274.  Name:     "FloorEndUnit[291]"
  11275.  Number:   291
  11276.  Size:     400 1272 400
  11277.  Position: 0 0 0
  11278.  Type:     29
  11279.  Layer:    0
  11280. End_Chunk
  11281. Chunk: Distancing
  11282.  Visible:   3000
  11283.  Invisible: 3187
  11284.  Replace:   292
  11285. End_Chunk
  11286. Chunk: Colours
  11287.  Number: 102
  11288.  0x87 0x86 0x85 0x82 0x83 0x84 0xB9 0xBA 0xBB 0xBA 0xB9 0xBA 0xBB 0xBC 0xBB 0xBA
  11289.  0xBB 0xBC 0xBD 0xBC 0xBB 0xBC 0xBD 0xBE 0xBD 0xBC 0xBD 0xBE 0xBF 0xBE 0xBD 0xBC
  11290.  0xBD 0xBE 0xBD 0xBC 0xB8 0xB9 0xBA 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xB6 0xB7
  11291.  0xB8 0xB7 0xB6 0xB5 0xB6 0xB7 0xB6 0xB5 0xB6 0xB7 0xB8 0xB7 0xB6 0xBB 0xBC 0xBD
  11292.  0xBC 0xBB 0xBA 0xBB 0xBC 0xBB 0xBA 0xB9 0xBA 0xBB 0xBA 0xB9 0xB8 0xB9 0xBA 0xB9
  11293.  0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xBA 0xBB 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  11294.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  11295. End_Chunk
  11296. ;
  11297. ;-------Object  292-------------------------------------------------------
  11298. ; 
  11299. Chunk: Standard
  11300.  Name:     "FloorEndUnit[292]"
  11301.  Number:   292
  11302.  Size:     400 1272 400
  11303.  Position: 0 0 0
  11304.  Type:     66
  11305.  Layer:    0
  11306.  DFlags:   R
  11307.  OFlags:   i
  11308. End_Chunk
  11309. Chunk: Colours
  11310.  Number: 48
  11311.  0xB8 0xB6 0xB7 0xBA 0xBB 0xBC 0xB9 0xBA 0xB8 0xBA 0xBB 0xBB 0xBA 0xBB 0xBC 0xBA
  11312.  0xB7 0xBD 0xBE 0xBD 0xB9 0xB9 0xBD 0xBC 0xBC 0xB7 0xBB 0xBC 0xBD 0xBB 0xB9 0xBC
  11313.  0xB8 0xB6 0xB8 0xBA 0xBB 0xBC 0xBB 0xBA 0xBC 0xBA 0xB8 0xB9 0xBA 0xBC 0xBE 0xBE
  11314. End_Chunk
  11315.  
  11316. End_Children
  11317. ;
  11318. ;-------Object  283-------------------------------------------------------
  11319. ; 
  11320. Chunk: Standard
  11321.  Name:     "Oven[283]"
  11322.  Number:   283
  11323.  Size:     400 2950 400
  11324.  Position: 2400 1700 400
  11325.  Type:     65535
  11326.  Layer:    0
  11327. End_Chunk
  11328.  
  11329. Children:
  11330. ;
  11331. ;-------Object  284-------------------------------------------------------
  11332. ; 
  11333. Chunk: Standard
  11334.  Name:     "FloorEndUnit[284]"
  11335.  Number:   284
  11336.  Size:     400 1206 400
  11337.  Position: 0 1743 0
  11338.  Type:     28
  11339.  Layer:    0
  11340. End_Chunk
  11341. Chunk: Distancing
  11342.  Visible:   3000
  11343.  Invisible: 3187
  11344.  Replace:   285
  11345. End_Chunk
  11346. Chunk: Colours
  11347.  Number: 102
  11348.  0x87 0x86 0x85 0x82 0x83 0x84 0xB9 0xBA 0xB9 0xBA 0xBB 0xBA 0xBB 0xBA 0xBB 0xBC
  11349.  0xBB 0xBC 0xBB 0xBC 0xBD 0xBC 0xBD 0xBC 0xBD 0xBE 0xBD 0xBE 0xBD 0xBE 0xBF 0xBC
  11350.  0xBD 0xBC 0xBD 0xBE 0xB8 0xB9 0xB8 0xB9 0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xB6 0xB7
  11351.  0xB6 0xB7 0xB8 0xB5 0xB6 0xB5 0xB6 0xB7 0xB6 0xB7 0xB6 0xB7 0xB8 0xBB 0xBC 0xBB
  11352.  0xBC 0xBD 0xBA 0xBB 0xBA 0xBB 0xBC 0xB9 0xBA 0xB9 0xBA 0xBB 0xB8 0xB9 0xB8 0xB9
  11353.  0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xBA 0xBB 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  11354.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  11355. End_Chunk
  11356. ;
  11357. ;-------Object  285-------------------------------------------------------
  11358. ; 
  11359. Chunk: Standard
  11360.  Name:     "FloorEndUnit[285]"
  11361.  Number:   285
  11362.  Size:     400 1206 400
  11363.  Position: 0 1743 0
  11364.  Type:     65
  11365.  Layer:    0
  11366.  DFlags:   R
  11367.  OFlags:   i
  11368. End_Chunk
  11369. Chunk: Colours
  11370.  Number: 102
  11371.  0xBC 0xBA 0xB7 0xB9 0xBB 0xBD 0xB9 0xBA 0xB8 0xB6 0xB9 0xBB 0xBC 0xB7 0xB9 0xB6
  11372.  0xB7 0xB8 0xBB 0xBC 0xB7 0xBC 0xBD 0xBB 0xBA 0xBA 0xB6 0xB6 0xBC 0xBD 0xBC 0xBB
  11373.  0xBC 0xBB 0xBC 0xBA 0xB8 0xB9 0xB9 0xBB 0xBD 0xB9 0xBE 0xBD 0xB8 0xB9 0xBB 0xB7
  11374.  0xB6 0xB7 0xB8 0xB5 0xB6 0xB5 0xB6 0xB7 0xB6 0xB7 0xB6 0xB7 0xB8 0xBB 0xBC 0xBB
  11375.  0xBC 0xBD 0xBA 0xBB 0xBA 0xBB 0xBC 0xB9 0xBA 0xB9 0xBA 0xBB 0xB8 0xB9 0xB8 0xB9
  11376.  0xBA 0xB7 0xB8 0xB7 0xB8 0xB9 0xBF 0xBE 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  11377.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  11378. End_Chunk
  11379. ;
  11380. ;-------Object  286-------------------------------------------------------
  11381. ; 
  11382. Chunk: Standard
  11383.  Name:     "FloorEndUnit[286]"
  11384.  Number:   286
  11385.  Size:     400 1743 400
  11386.  Position: 0 0 0
  11387.  Type:     29
  11388.  Layer:    0
  11389. End_Chunk
  11390. Chunk: Distancing
  11391.  Visible:   3000
  11392.  Invisible: 3187
  11393.  Replace:   287
  11394. End_Chunk
  11395. Chunk: Colours
  11396.  Number: 102
  11397.  0x87 0x86 0x85 0x82 0x83 0x84 0xB9 0xBA 0xBB 0xBA 0xB9 0xBA 0xBB 0xBC 0xBB 0xBA
  11398.  0xBB 0xBC 0xBD 0xBC 0xBB 0xBC 0xBD 0xBE 0xBD 0xBC 0xBD 0xBE 0xBF 0xBE 0xBD 0xBC
  11399.  0xBD 0xBE 0xBD 0xBC 0xB8 0xB9 0xBA 0xB9 0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xB6 0xB7
  11400.  0xB8 0xB7 0xB6 0xB5 0xB6 0xB7 0xB6 0xB5 0xB6 0xB7 0xB8 0xB7 0xB6 0xBB 0xBC 0xBD
  11401.  0xBC 0xBB 0xBA 0xBB 0xBC 0xBB 0xBA 0xB9 0xBA 0xBB 0xBA 0xB9 0xB8 0xB9 0xBA 0xB9
  11402.  0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xBA 0xBB 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  11403.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  11404. End_Chunk
  11405. ;
  11406. ;-------Object  287-------------------------------------------------------
  11407. ; 
  11408. Chunk: Standard
  11409.  Name:     "FloorEndUnit[287]"
  11410.  Number:   287
  11411.  Size:     400 1743 400
  11412.  Position: 0 0 0
  11413.  Type:     66
  11414.  Layer:    0
  11415.  DFlags:   R
  11416.  OFlags:   i
  11417. End_Chunk
  11418. Chunk: Colours
  11419.  Number: 102
  11420.  0xB8 0xB6 0xB7 0xBA 0xBB 0xBC 0xB9 0xBA 0xB8 0xBA 0xBB 0xBB 0xBA 0xBB 0xBC 0xBA
  11421.  0xB7 0xBD 0xBE 0xBD 0xB9 0xB9 0xBD 0xBC 0xBC 0xB7 0xBB 0xBC 0xBD 0xBB 0xB9 0xBC
  11422.  0xB8 0xB6 0xB8 0xBA 0xBB 0xBC 0xBB 0xBA 0xBC 0xBA 0xB8 0xB9 0xBA 0xBC 0xBE 0xBE
  11423.  0xB8 0xB7 0xB6 0xB5 0xB6 0xB7 0xB6 0xB5 0xB6 0xB7 0xB8 0xB7 0xB6 0xBB 0xBC 0xBD
  11424.  0xBC 0xBB 0xBA 0xBB 0xBC 0xBB 0xBA 0xB9 0xBA 0xBB 0xBA 0xB9 0xB8 0xB9 0xBA 0xB9
  11425.  0xB8 0xB7 0xB8 0xB9 0xB8 0xB7 0xBA 0xBB 0xBC 0xBD 0xBE 0xBF 0xB9 0xB8 0xB7 0xB8
  11426.  0xB9 0xBA 0xBB 0xBC 0xBD 0xBE
  11427. End_Chunk
  11428.  
  11429. End_Children
  11430. ;
  11431. ;-------Object  118-------------------------------------------------------
  11432. ; 
  11433. Chunk: Standard
  11434.  Name:     "FloorEndUnit[118]"
  11435.  Number:   118
  11436.  Size:     3000 1000 5800
  11437.  Position: 0 7820 200
  11438.  Type:     31
  11439.  Layer:    0
  11440. End_Chunk
  11441. Chunk: Colours
  11442.  Number: 12
  11443.  0xBA 0xBA 0xB7 0xBB 0xB9 0xBA 0xBD 0xBC 0xBB 0xBB 0xBC 0xBE
  11444. End_Chunk
  11445. ;
  11446. ;-------Object  115-------------------------------------------------------
  11447. ; 
  11448. Chunk: Standard
  11449.  Name:     "FloorEndUnit[115]"
  11450.  Number:   115
  11451.  Size:     200 6120 5600
  11452.  Position: 0 1700 400
  11453.  Type:     0
  11454.  Layer:    0
  11455. End_Chunk
  11456. Chunk: Colours
  11457.  Number: 6
  11458.  0x00 0xBA 0xBB 0x00 0xBC 0xBF
  11459. End_Chunk
  11460. ;
  11461. ;-------Object  116-------------------------------------------------------
  11462. ; 
  11463. Chunk: Standard
  11464.  Name:     "FloorEndUnit[116]"
  11465.  Number:   116
  11466.  Size:     2600 6120 200
  11467.  Position: 200 1700 5800
  11468.  Type:     0
  11469.  Layer:    0
  11470. End_Chunk
  11471. Chunk: Colours
  11472.  Number: 6
  11473.  0x00 0xBA 0xB7 0x00 0xBC 0xBF
  11474. End_Chunk
  11475.  
  11476. End_Children
  11477. ;
  11478. ;-------Object   44-------------------------------------------------------
  11479. ; 
  11480. Chunk: Standard
  11481.  Name:     "Dishwasher"
  11482.  Number:   44
  11483.  Size:     6000 8820 6000
  11484.  Position: 0 0 0
  11485.  Type:     65535
  11486.  Layer:    0
  11487. End_Chunk
  11488. Chunk: SCL
  11489. long   x;
  11490.  
  11491.  
  11492. end
  11493. End_Chunk
  11494.  
  11495. Children:
  11496. ;
  11497. ;-------Object   34-------------------------------------------------------
  11498. ; 
  11499. Chunk: Standard
  11500.  Name:     "door hold[34]"
  11501.  Number:   34
  11502.  Size:     6000 5856 200
  11503.  Position: 0 1500 200
  11504.  Type:     113
  11505.  Layer:    1
  11506. End_Chunk
  11507. Chunk: TexCoords
  11508.  Number: 1
  11509.  Mode:   0
  11510.  SubChunk
  11511.   Facet:     1
  11512.   ImageRef:  1
  11513.   PixScale:  0
  11514.   NumCoords: 4
  11515.     0.00000 0.00000
  11516.     0.00000 1.00000
  11517.     1.00000 1.00000
  11518.     1.00000 0.00000
  11519. End_Chunk
  11520. Chunk: Colours
  11521.  Number: 6
  11522.  0xBA 0xB9 0xB8 0xB9 0xB8 0xBC
  11523. End_Chunk
  11524.  
  11525. Chunk: ImageRef
  11526.  Number: 4
  11527.  Index: 1 Image: 1
  11528.  Index: 2 Image: 2
  11529.  Index: 3 Image: 3
  11530.  Index: 4 Image: 4
  11531. End_Chunk
  11532. Chunk: SCL
  11533. long   v00=1, v01=20, v02=5, v03=5;
  11534.  
  11535.  
  11536.  
  11537. resume (1, 1);
  11538.  
  11539. if (activate (me, 0) || activate (child (me), 0) || activate 
  11540.  
  11541.     (sibling (child (me)), 0) || activate (sibling (sibling 
  11542.  
  11543.     (child (me))), 0))
  11544.  
  11545. {
  11546.  
  11547.   #44.x=1;
  11548.  
  11549.   waitfs (3);
  11550.  
  11551.   repeat (v01)
  11552.  
  11553.   {
  11554.  
  11555.     xrot (me)+=v02*v00;
  11556.  
  11557.     waitf;
  11558.  
  11559.   }
  11560.  
  11561.   v02=-v02;
  11562.  
  11563.   if (v02==v03)
  11564.  
  11565.     #44.x=0;
  11566.  
  11567.   clrtrig (me, 0);
  11568.  
  11569.   clrtrig (child (me), 0);
  11570.  
  11571.   clrtrig (sibling (child (me)), 0);
  11572.  
  11573.   clrtrig (sibling (sibling (child (me))), 0);
  11574.  
  11575. }
  11576. end
  11577. End_Chunk
  11578. Chunk: Rotations
  11579.  Initial: 0x0000 0x0000 0x0000
  11580.  Centre:  0 0 195
  11581. End_Chunk
  11582.  
  11583. Children:
  11584. ;
  11585. ;-------Object   43-------------------------------------------------------
  11586. ; 
  11587. Chunk: Standard
  11588.  Name:     "door1st[43]"
  11589.  Number:   43
  11590.  Size:     6000 5856 200
  11591.  Position: 0 0 0
  11592.  Type:     27
  11593.  Layer:    0
  11594. End_Chunk
  11595. Chunk: Distancing
  11596.  Visible:   6000
  11597.  Invisible: 6375
  11598.  Replace:   63
  11599. End_Chunk
  11600. ;
  11601. ;-------Object   63-------------------------------------------------------
  11602. ; 
  11603. Chunk: Standard
  11604.  Name:     "door2nd[63]"
  11605.  Number:   63
  11606.  Size:     6000 5856 200
  11607.  Position: 0 0 0
  11608.  Type:     13
  11609.  Layer:    0
  11610. End_Chunk
  11611. Chunk: Distancing
  11612.  Visible:   8000
  11613.  Invisible: 8500
  11614.  Replace:   70
  11615. End_Chunk
  11616. ;
  11617. ;-------Object   70-------------------------------------------------------
  11618. ; 
  11619. Chunk: Standard
  11620.  Name:     "door3rd[70]"
  11621.  Number:   70
  11622.  Size:     6000 5856 200
  11623.  Position: 0 0 0
  11624.  Type:     69
  11625.  Layer:    0
  11626.  DFlags:   R
  11627.  OFlags:   i
  11628. End_Chunk
  11629.  
  11630. End_Children
  11631. ;
  11632. ;-------Object   77-------------------------------------------------------
  11633. ; 
  11634. Chunk: Standard
  11635.  Name:     "Dishwasher[77]"
  11636.  Number:   77
  11637.  Size:     6000 1464 150
  11638.  Position: 0 7356 250
  11639.  Type:     45
  11640.  Layer:    0
  11641. End_Chunk
  11642. ;
  11643. ;-------Object  156-------------------------------------------------------
  11644. ; 
  11645. Chunk: Standard
  11646.  Name:     "Dishwasher[156]"
  11647.  Number:   156
  11648.  Size:     400 400 100
  11649.  Position: 4800 7600 150
  11650.  Type:     47
  11651.  Layer:    0
  11652. End_Chunk
  11653. Chunk: Colours
  11654.  Number: 18
  11655.  0x00 0x1A 0x1B 0x1C 0x1D 0x19 0x18 0x17 0x1C 0x18 0x19 0x1A 0x1B 0x1C 0x1D 0x1E
  11656.  0x1F 0x1E
  11657. End_Chunk
  11658. ;
  11659. ;-------Object   76-------------------------------------------------------
  11660. ; 
  11661. Chunk: Standard
  11662.  Name:     "Dishwasher[76]"
  11663.  Number:   76
  11664.  Size:     6000 7320 5600
  11665.  Position: 0 1500 400
  11666.  Type:     46
  11667.  Layer:    0
  11668. End_Chunk
  11669. Chunk: SCL
  11670. if (gvar (0, parent (me))!=0)
  11671.  
  11672.   vis (me);
  11673.  
  11674. else
  11675.  
  11676.   invis (me);
  11677.  
  11678.  
  11679. end
  11680. End_Chunk
  11681. Chunk: Colours
  11682.  Number: 9
  11683.  0x7F 0x1B 0x1F 0x1B 0xBC 0xBE 0x19 0x1C 0x1D
  11684. End_Chunk
  11685. ;
  11686. ;-------Object  155-------------------------------------------------------
  11687. ; 
  11688. Chunk: Standard
  11689.  Name:     "Dishwasher[155]"
  11690.  Number:   155
  11691.  Size:     6000 1500 4900
  11692.  Position: 0 0 1100
  11693.  Type:     0
  11694.  Layer:    0
  11695. End_Chunk
  11696. Chunk: Colours
  11697.  Number: 6
  11698.  0x00 0xBD 0x00 0x00 0x00 0x1A
  11699. End_Chunk
  11700.  
  11701. End_Children
  11702.  
  11703. End_Children
  11704.  
  11705. End_Children
  11706.  
  11707. End_Children
  11708. End_File